

2/3 . . 

Februar/ 

März 1992 
9. Jahrgang 

CPC kreativ 


- Labyrinthe aus dem Computer 

Das beste Globus-Proar 


- Zum Abtip 
Benutzero 


Abtippen: Digiglobe mit grafischer 
itzeroberfläche 


Welt am Draht 


Datenfernübertragung: 
Einstieg leichtgemacht 

Werkzeuae für die Praxis 


- Diskettenmonitor der Spitzenklasse 

- Platz sparen mit Turbo Pascal 

- Premiere: die Trickkiste 

Willkommen im Soiele 


- Lösungshilfen 

- Neuheiten: Night Shift, Plotting 


SAM: 8-Biteinmal 
N ^ anders 


PCW 


• s =Sä§ä§ 
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- Große Schriften für LocoScript 

- GSX-Plot: das große Finale 

- Programmiersprache der Profis: 






























































































































































































































































































































































Inhalt: 


für den privaten Haushalt: 

- Kontenverwaltung 

- Haushaltsbilanzen 

-Orakel: Hochrechnung effektiver 
Verbraucherkosten 

- Lohnsteuerberechnung 

- KFZ-Kosten 

- Belegverwaltung 

- Bankformulare 

- Wertpapierverwaltung 

- Komfortable Währungsumrechnung 

- Tilgung 

- Komplette Mini-Tabellenkalkulation 

für kleinere Business-Anwendungen: 

- Rechnungsschreibung 

- Pecunia 

- Bestellung und Bestand 

- Superplan 


Der Finanz-Fachmann 


Ein CPC-Mega-Sampler, voll mit praktischen 
Anwenderprogrammen rund ums liebe Geld 
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Lernen mit Spaß 


Sicherlich liegt es Ihnen auch am Herzen, daß die Sprößlinge eifrig und 
effektiv lernen und nicht nur stur büffeln. 

Der Pädagoge Berthold Freier hat mit den Programmdisketten 
"Lernen mit Spaß' 1 1 und 2 ein Lerninstrument geschaffen, das in dieser 
Art einmalig ist. Auf den Disketten befinden sich zahlreiche Spiel¬ 
programme, die Ihren Kindern spielerisch das Verständnis für Zahlen. 
Text und Farben vermitteln. Auch das Allgemeinwissen wird aus¬ 
reichend gefördert. 

Für Kinder von 4 bis 1 2 Jahren wird durch "Lernen mit Spaß" 1 und 2 
der CPC-Computer zum lehrreichen Freund. 

Machen Sie Ihren Kindern mit "Lernen mit Spaß” eine Freude. 


Lernen m it Spaß 1 


DM 24,95 



Lernen mit Spaß 2 DM 24,95 


Joyce-Highlights: 

Software-Perlen für Ihren Joyce/PCW 


JOYCE-Highlights I: “Anwender” 

Viele nützliche Arbeitserleichterungen 

Spooler: Druckerspooler (256 und 512 KByte) 

■ CAT: zeigt Disketteninhalt sortiert, auch versteckte 
Dateien • Loco2Pro. Konvertierung von LocoScript 
nach Prowort File • Rescue: Retten gelöschter 
Daten • Akte: Etikettenprogramm • Kalender: 
Feiertage, persönliche Daten • Drucken List V2.1: 
Listingdrucken und Kommentare • Funktionstasten: 
zeigt die Belegung auf allen fünf Ebenen • Für 
immer und ewig: Komprimieren und Entpacken von 
Dateien ■ Vario: Hardcopy auf (fast) allen Druckern 
• JOYCE-Tools: Benutzeroberfläche für 
Dateibearbeitung 


nur DM 29,- 


JO YCE-Highlights II: “Spiele” 

Für jeden etwas dabei. 14 ausgesuchte Spiele 
als Programmpaket - vom Kinderspiel über 
Unterhaltung bis zum kniffligen Denkspiel 


Gobang 

Pingo 

Backgammon 
Mensch, ärgere dich nicht 
Lokomotive 
Rubik's Clock 
Industriemanager 


Jackpot 

Poker 

Fruit 

M aster M ind 
Ölmanager 
Verbindungen 
Q-Bert 

nur DM 29, 
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Editorial 


Wenn der Kaffeesatz 
nicht trügt... 

"Das werden die Renner!" .versprach eines der bekanntesten Computermagazine wieder einmal groß 
und bunt auf der Titelseite seiner Neujahrsausgabe. "Oh. prima", dachte ich und griff danach. Sollte 
tatsächlich jemand mit einem absolut neuen und überwältigenden Produkt in den Computermarkt hin¬ 
eingebrochen sein, das die Zukunft bereits jetzt für sich entschieden hätte? Die Ernüchterung folgte 
dann, als ich den Artikel las: "24-Nadel-Drucker werden auch für Durchschnittsverdiener erschwing¬ 
lich, so daß der 9-Nadler seine Talfahrt in der Beliebtheitsskala fortsetzt. Der Trend bei den privaten 
Computerliebhabern bewegt sich in puncto Leistung nach oben: über den 24-Nadler hin zum Tinten¬ 
strahler und Laser. Die durchschnittliche Festplatte wird schneller sein und mehr Platz bieten als bisher, 
und von den bekannten Standard-Software-Paketen wird es im Laufe des Jahres sicherlich mindestens 
eine neue Version geben." 

Ach nee! 

Wenn auch das, was der unbekannte Kollege da aus dem Kaffeesatz gelesen hat, sich in Banalitäten und 
Binsenweisheiten erschöpft, hat er offensichtlich eine Marktlücke gefunden. Zukunft ist immer interes¬ 
sant - gerade deswegen, weil niemand sie so recht im Griff zu haben scheint. 

Vielleicht gibt es ja auch im Computerbereich bald so etwas wie die altbekannten Bauernregeln nach 
dem Muster "Wenn der Hahn kräht auf dem Mist, ändert sic/Ts Wetter oder es bleibt, wie's ist”. Nur 
dürften sie hier in anderem Gewände daherkommen. Etwa: 

"Ragt lang die Schlang ' aus dem Computershop. 
sind im Frühjahr die Laserdrucker top.” 



Orakel dieser Art verhelfen dem Computerfreund wieder und wieder zu den sogenannten "Ach nee” - 
Erlebnissen. Man hat sie immer dann, wenn man etwas "ganz Unerhörtes” hört oder liest, das einem 
ebensogut vom Haushund oder dem täglichen Zeitungshoroskop hätte offenbart werden können. 

Was, Sie meinen, ich will mich nur drücken? Sie meinen, ich soll endlich Farbe bekennen und auch - wie 
alle anderen - ein 92er Orakel in Form einer trendbewußten Prognose loslassen? 

Das können Sie haben. Also: In diesem gerade angebrochenen Jahr werden zahlreiche CPC- und PCW- 
Benutzer die CPC International lesen. Viele gebrauchte CPCs werden per Kleinanzeige die Besitzer 
wechseln. Das Interesse der Firma Amstradan den 8-ßit-Geräten wird weiterhin abnehmen, zugunsten 
der IBM-kompatiblen PC-Serien. Diese werden weiterentwickelt und bei allgemein gleichbleibenden 
Preisen immer schneller und leistungsfähiger. Der allgemeine Trend zu immer feinerer Auflösung und 
immer mehr Speicherkapazität hält an. 

Na, zufrieden? Eine Runde Eschweger Klosterbräu für jeden Zweifler, wenn eine meiner Vorhersagen 
nicht eintreffen sollte. 

Ich würde mich allerdings doch freuen, wenn Ihnen beim Lesen dieser Ausgabe weniger "Ach nee”- 
als vielmehr " Aha!”-Erlebnisse begegneten. Denn die Zukunft steht nicht im Kaffeesatz, sondern wird 
von Leuten wie Ihnen kreativ gestaltet. Und kreatives Gestalten - das ist es nicht zuletzt, was wir als 
Computerjournalisten durch Tips und Tricks unterstützen wollen. 

In diesem Sinne: Bleiben Sie am Ball! Es grüßt Sie Ihr 



Peter Schmitz, Chefredakteur 


2/3'92 CPC 3 









INHALT 


BERICHT: 


Die “CeBIT des kleinen Mannes” 
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Wenn man als CPCIer auch bisweilen das Gefühl hat, im Abseits zu 
stehen: Es gibt auch in Deutschland noch Oasen der 8-Bit-Kultur. Bei 
Weeske im schwäbischen Backnang etwa ist die CPC-Welt noch in 
Ordnung. Hier findet sich Hard- und Software, Zubehör und techni¬ 
sches Know-how die Fülle. Wir haben mit denen gesprochen, die in 
diesem ungewöhnlichen Familienbetrieb arbeiten 




■ 


Wenn Daten auf Rei¬ 
sen gehen, wird es 
nicht nur für “ernsthaf¬ 
te " ED Vier interessant: 
Der Austausch von Er¬ 
fahrungen. Know-how, 
Meinungen und 
Grüßen über alle 
Grenzen des eigenen 
Rechnersystems hin¬ 
weg macht auch dem 
Hobby-Hacker Spaß. 
Schnuppern Sie mit 
uns ein wenig in die 
große Welt der Daten¬ 
fernübertragung hinein 
und lassen Sie sich 
neugierig machen auf 
Mailboxen, Baudraten 
und Hackertreffs 

S.16 


"Dein Drucker, das un¬ 
bekannte Wesen"? 
Ratloses Schulter¬ 
zucken, wenn ein Eti¬ 
kett sich im Inneren des 
Schreibknechts verkrü¬ 
melt hat? Druckkopf¬ 
wechsel - eine Sache 
für die Fachwerkstatt? 
Mit etwas Mut und Ge¬ 
duld, einem Schrau¬ 
benzieher und unserem 
Hardware-Artikel kön¬ 
nen Sie den Amstrad- 
Flachbettdruckern der 
DMP-Serie auch selbst 
ein wenig unters 
Hemdchen gucken 

S. 60 
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Ein geschärfter Blick - unentbehrlich für jeden Abenteuer-Spieler. In 
vielen Fällen ist es nötig, auch dem CPC so etwas wie ein "program¬ 
miertes Sehvermögen"zu verschaffen - etwa dann, wenn er Auswege 
aus verzwickten Gangsystemen finden soll. Einem Programm so et¬ 
was wie Orientierung beizubringen, ist kinderleicht 

S.68 


HIS10RIC EUROPEAN RAILWAVS13 


RBCDEP'Gm JKXMTJ0PQRSTUVW:>CY2 • 1234S6789 

ABCDEF6HI JKLnNOPORSIUVWSYe -183456789 
flßCDEFGHI JKLMNOPORGTUVUKV? -123456789 

fffiCDMJig!roilMYZie 3 q 56 m 1 


ABCDEFGHIJKLM 

IMQPORSTUVWXYa 

l*a, 3 -a.SfB:'PlK 8 : 9 TO 


RBCDEFGHIJKLM 
NOP.DRSTUUWXYZ 
1B3456789Q 


Große Schriften er¬ 
wecken Aufmerksam¬ 
keit und helfen, Stich¬ 
worte ins Auge fallen 
zu lassen. Keine Zei¬ 
tung oder Zeitschrift 
kommt ohne " Head¬ 
lines" und “ Schlagzei¬ 
len ” aus. Wir haben ein 
pfiffiges Zusatzpro¬ 
gramm getestet, das 
auch Ihrer " Heim - 
druckerei” aut dem 
Joyce zu auffälligen 
Überschriften verhütt 

S.76 



Die Erde auf dem CPC-Bildschirm: Viele Leser haben sich Gedanken 
gemacht, wie man diese Programmidee umsetzen und ausfeilen 
könnte. Das Ergebnis unseres "Digiglobe"-Wettbewerbs ist da - und 
der Sieger hat ein echtes Spitzenprogramm mit grafischer Benutzer¬ 
oberfläche geliefert 

S. 87 


SERVICE: 
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101 AMS-Line 
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ramme aus der Program¬ 
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is 
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Aktuell 


Hundert DM für 16 Spiele 


Key Mouse für PCW 


Die Firma Weeske bietet jetzt 
dem Interessenten fünf bisher 
eigenständig verkaufte Pro¬ 
grammpakete aus dem Schnei¬ 
der-Computer-Division-Sorti¬ 
ment an. So findet man inner¬ 
halb dieser Sammlung Spiel¬ 
klassiker wie Bruce Lee, Match 
Day, Sorcery Plus und nicht zu¬ 


letzt die komplette Roland- 
Story. Wer gern Flipper spielt, 
kann sich mit dem Macadam 
ßumper vergnügen. Wer also 
seine Sammlung erweitern möch¬ 
te, sollte auf diesen Klassiker 
nicht verzichten. 

Info: Weeske Computer-Elektronik . 
Potsdamer Ring 10,7150 Backnang 


Creative Technology hat jetzt 
eine neue Maus für den PCW' 
herausgebracht. Der Anschluß 
erfolgt direkt zwischen Tastatur 
und PCW. 

Die Drei-Tasten-Maus kann in 
Anwendungen wie zum Bei¬ 


spiel LocoScript, Protext und 
nicht zuletzt auch unter CP/M 
eingesetzt werden. 

Infos: ./PS, Bernhard Graßhoff, 
Roesoll 36,2505 Heikendorf 


Schneider 

w9conrutEf/omion 



Schlimme 


Ganz schlimme Finger scheinen 
die Italiener zu sein. Nicht nur, 
daß sie den deutschen Urlaubern 
die Frauen ausspannen, nein, 
auch Software wird hier schein¬ 
bar völlig sorglos an den Mann 
gebracht. Laut der neuesten 


Finger in Italien 

Presseinformation der BSA 
(Business Software Alliance), 
wurden bei mehreren Haus¬ 
durchsuchungen bei namhaften 
Firmen Masterdisketten von 
deutschen und amerikanischen 
Softwareherstellern gefunden. 



Kompatibilitätsmodul 
für CPC-plus 

Wer mit dem CPC plus arbei- sage der Firma Obermeier 
tet. wird des öfteren Schwie- durch ein Kompatibililätsmo- 
rigkeiten mit Software bekom- dul abgeholfen werden, 
men die für die älteren Ge¬ 


schwister geschrieben wurden. Info: Fritz Obermeier Computer 
Diesem Umstand soll laut Aus- Bänder Straße 20.4972 Löhne 




KC-Restbestände 


Die syscom Vertrieb und Servi¬ 
ce GmbH. Mühlhausen, bietet 
noch Zubehör für den KC-com- 
pakt, das östliche Äquivalent 
zum CPC 6128, an. So unter an¬ 
derem das Systemhandbuch, 
Teil eins und zwei, sowie eine 
Gerätebeschreibung und ein 
BAS IC-Handbuch. 

Gerade das Systemhandbuch 
sollte jedem C.PCler wärmstens 
empfohlen werden, da hier 
sämtliche Systemadressen und 
Systemroutinen übersichtlich 


aufgelistet sind. Da es kaum 
noch Kassettensoftware für den 
CPC gibt, sollten auch noch fol¬ 
gende Programme erwähnt wer¬ 
den. Für Spottpreise sind noch 
Assembler. Pascal-Compiler, 
Musik- und Grafikprogramme 
und einige Spiele zu erstehen. 
So sollte es für jeden interessant 
sein, eine Liste anzufordern. 

Info: syscom Vertrieb und Service 
GmbH, Görmarscher Landstr. HL 
0-5 700 Mühlhausen 


Neue Mailboxen für CPCIer 


Ab dem 1.2. werden in Deutsch¬ 
land zwei neue Mailboxen in 
Betrieb genommen. 

Die erste Mailbox von Mike 
Behrendt, der auf einem PC mit 
40-MByte-Festplatte alle CPC- 
Dateien gespeichert hat, wird 
neben jeder Menge Public Do¬ 
main noch einige Bonusse ent¬ 
halten. So zum Beispiel Bretter 
von der CPC International und 
vielen Fanzines der internatio¬ 
nalen Szene. 

Erreicht werden kann die MB V- 
Box über die Nummer 
02236/83007. 


Über den Inhalt der zweiten 
Mailbox, die von Herrn Wolf¬ 
gang Noistemig gewartet wird, 
kann noch nichts Genaueres ge¬ 
sagt werden. Fest steht jedoch, 
daß auch hier sehr viel PD für 
den CPC und allgemein für 
CP/M vorhanden sein wird. 

Die Rufnummer dieser Mailbox 
lautet 04541/84888 oder 
04541/84848. Auch dies stand 
leider bei Drucklegung noch 
picht fest. Beide Mailboxen 
werden 24 Stunden online sein. 
Sie werden mit jeweils 2400 
Baud betrieben. 


Für Wißbegierige 


Seit dem 11. Dezember findet 
im Deutschen Museum eine 
Sonderausstellung statt. Thema 
dieser Ausstellung sind Chips. 
Insgesamt 57 Bilder sollen ei¬ 
nen kurzen Einblick in den De¬ 
sign-Prozeß von höchstinte¬ 
grierten Chips geben. So wer¬ 


den Plotter-Zeichnungen sowie 
mikroskopische Aufnahmen der 
einzelnen Chips eins zu eins ge¬ 
genübergestellt. Wer also Inter¬ 
esse hat, sollte bis spätestens 
zum 8. März dieses Jahres das 
Deutsche Museum besuchen. 
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Dach 


Bericht 


”Hobby + Elektronik” 
mit “Funk 91” 
und “Modellbau 
Süd” in Stuttgart 


Eine Art “CeBIT des kleinen Mannes" 
ist sie, die Verkaufsmesse “Hobby + 
Elektronik”, die alljährlich auf dem 
Killesberg in Stuttgart stattfindet. 
Während die hannoversche EDV-Stan- 
dardmesse ein Stelldichein der kom¬ 
merziellen Anwender mit Schlips und 
Kragen bietet, kommt in Stuttgart der 
Bastler zu seinem Recht, der engagierte 
Hobbyist. Was hier gezeigt wird, ist für 
den praktischen Einsatz “vor Ort” im 
Hobbykeller oder häuslichen Arbeits¬ 
zimmergedacht. So war es auch dieses 
Jahr. 

Unter dem Dach der “Hobby + Elektro¬ 
nik” gab es aber noch mehrzu sehen. Im 
Rahmen der Unterausstellung “Funk 
91” wurde CB-Freunden und Amateur¬ 
funkern all das geboten, was die Kom¬ 
munikation überden Äther angeht. Und 
die integrierte “Modellbau Süd” mach¬ 
te das Dreiergespann der Messen voll¬ 
zählig: Vom ferngesteuerten Riesen- 
Truck bis zur winzigsten Schiffs¬ 
schraube reichte hier das Sortiment der 
Aussteller, ln Halle 4 erwartete die Be¬ 
sucher eine besondere Attraktion: Von 
Verbrennungsmotoren getriebene Mo¬ 
dell-Rennwagen kämpften hier live um 
Meter und Sekunden. Publikumsma¬ 
gnete dieser Art wurden vielleicht be¬ 
sonders von denen begrüßt, die sich 
selbst gar nichts daraus machten: Wenn 
nämlich ein großer Teil der “Seh-Leu- 
te” sich von spektakulären Vorführun¬ 
gen fesseln ließ, hatten die Besucher 
mit konkretem Fachinteresse zumin¬ 
dest eine Chance, zu den Ständen der 
Aussteller durchzukommen. 



Vom 7. bis 10. November 1991 gab es rund um Computer, Funktechnik und Mo¬ 
dellbau auf dem Messegelände am Stuttgarter Killesberg fast alles zu sehen 
(und zu kaufen), was des Bastlers Herz begehrt. Wir waren für Sie dort und 
wollten wissen, ob CeBIT-enttäuschteCPCIer vielleicht hier noch Interessantes 
Finden konnten. 


Auf der Suche nach Interessantem für 
CPC-Benutzer wurden wir sehr schnell 
fündig: Am Stand der Firma Bräutigam 
Meßtechnik big aus Dortmund trafen 
wir Wolfgang Graf von CG-Soft 
Aachen. Er verkaufte Second-Hand- 
Software. Wir trauten unseren Augen 
kaum: Da waren tatsächlich etliche Da- 
tabox-Cassetten zu alten “PC-lnterna- 
tional”-Ausgaben dabei! Auch andere 
CPC-Soft wäre steckte in der Wühlkiste 
- und fand ihre Abnehmer. Wolfgang 
Graf erzählte uns, er mache Reparatu¬ 
ren für Heimcomputer und handle auch 
mit gebrauchten Systemen. Wer ge¬ 
brauchte Software oder Zubehör spezi¬ 
ell für den CPC suche, könne bei ihm in 
Aachen durchaus etwas finden. Wir 
versprachen, ihn demnächst einmal für 
einen “Personality”-Bericht zu besu¬ 
chen, und zogen weiter. 

Unverhofft kommt oft 

Wie wohl jeder gestandene CPCIer 
weiß, ist es mit Büchern für die 8-Bit- 
Amstrad-Systeme so eine Sache. Es ist 
zwar schon Vorjahren beinahe alles zu 
Papier gebracht worden, was man wis¬ 
sen will. Bloß bekommt man den ent¬ 
sprechenden Lesestoff in keiner Buch¬ 
handlung mehr. Wer nicht das Glück 


hat, bei Spezialversendern Restposten 
zu finden, guckt in die Röhre. 

Etwas zum Lesen, bitte 

Welch angenehme Überraschung er¬ 
lebten wir daher, als wir am Stand des 
IDEA-Verlags aus Puchheim jede 
Menge Klassiker entdeckten! Darunter 
auch die hervorragende “Spaß mit ßa- 
sic”-Trilogie von Peter Krizan, mit der 
wohl mancher von uns seine ersten 
Schritte auf dem Computer unternom¬ 
men hat. 

Auf unsere Nachfrage hin erfuhren wir, 
daß man in Puchheim durchaus noch 
nennenswerte Bestände zum Versand 
bereithält. So gibt es unter anderem 
Paul Bauriedls “Maschinensprache- 
programme und Hardware-Erweite¬ 
rungen für Schneider CPC's” für 15 
Mark, Berthold Freiers Buch “25 Ex¬ 
tra-Spiele mit Köpfchen für den 
Schneider CPC” sowie etliche Bände 
aus Peter Krizans universeller "Basic- 
Software-Bibliothek” für unter 10 
Mark je Buch im Versand. 

Einmal auf den Buch-Geschmack ge¬ 
kommen, fanden wir dann am Stand des 
Hofacker-Verlags aus Holzkirchen ei¬ 
nige Bücher zum Programmieren in 
Z80-Assembler. Auch eine Referenz- 
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Bericht 




)i e Firma Weeske eins Backnang naite cs mein 
,llzu weil bis zum Killesberg. An ihrem Stand 
■ab es reichlich CPC-Software. aber auch spe¬ 
zielle Verbindungskabel und Hardware-Son- 
lerangehote wie etwa den PPC -Laptop fw 500 
\4ark 



Eine bombige Idee: Computerschroll und un¬ 
vollständige Geräte ohne Garantie zu niedrig¬ 
sten Preisen - so löst man das Problem der 
Entsorgung. Die Bastler griffen gerne zu 


karte zur Z80-Maschinensprache für 5 
Mark hat man dort noch im Angebot. 
Etwas trauriger sah die Sache bei Data 
Becker aus. Zwar fanden wir einige 
Stapel bester CPC-Literatur am Stand. 
Man sagte uns aber, diese Bücher seien 
die letzten und würden auf der Messe 
ausverkauft, um das Lager endgültig 
von 8-Bit-Literatur zu räumen. Wer al¬ 
so in Zukunft noch einen der CPC- 
Buchklassikcr von Data Becker sucht, 
wird auf Antiquariate angewiesen sein. 
Die “Hobby + Elektronik” hatte für uns 
jedoch schnell einen Trost parat: Mitten 
in Halle 14 umgab uns plötzlich “CPC- 
Feeling total”. Die Firma Weeske aus 
Backnang hatte mächtig zum Messe¬ 
einsatz gerüstet und. überraschte mit 
Sonderpreisen. Hier landen wir nicht 
nur den obligatorischen “Plus mit Joy- 
pad, sondern auch Marconis “Tracker 
Ball” für den CPC samt “Easiart”. Wer 
noch keinen Drucker hatte, konnte sich 
zum Dumping-Preis einen “Riteman 
F+” (Flachbett-9-Nadler, fast völlig 
identisch mit DMP 3160) mitnehmen. 
Dann natürlich: Spiele, Spiele und 
nochmals Spiele. 


Es funkt 

In den Hallen 11 und 12 erwarteten wir 
in puncto 8-Bit keine allzu großen Sen¬ 
sationen. Immerhin residierte hier die 
eingebettete “Funk 91”. Allerdings 
fanden sich auch DFÜler und Compu¬ 
terclubs hier zusammen. 

Auf dem Weg zu den Clubs erst einmal 
eine Überraschung. Zwischen lauter 
für uns mehr oder weniger undefinier¬ 
barem CB-Funker-Zubehör träumte da 
ein Radiowecker-Modul vor sich hin, 
das Amstrad vor Jahren als Ergänzung 
zum CPC-Heimcomputersystem ge¬ 
baut hat. Der Preis? “Dreißig Mark. 
Wenn Sie wollen, kann ich auch noch 
mehr davon besorgen.” Der so sprach, 
war Holger Jauernig, seines Zeichens 


Chef der Backnanger Firma “Jauernigs 
Funkparadies”. Wozu das Amstrad- 
Modul gut sein sollte, wußte er aller¬ 
dings nicht — wir klärten ihn aul. 
Enttäuschung dann bei den Computer¬ 
clubs, von denen wir eigentlich einiges 
erwartet hatten: Immerhin sind bei 
schwindendem Firmeninteresse tür 8- 
Bit-User gerade die Clubs ein beson¬ 
ders wichtiges Forum. Wohin wir aber 
auch kamen: Fehlanzeige. Hier Amiga. 
dort Atari, da immer wieder PC und 
Macintosh. Der größte Stuttgarter 
Computerclub hat zwar eine Gruppen¬ 
arbeit, die sich sehen lassen kann - aber 
auf die Frage, ob unter den Mitgliedern 
auch CPC-Benutzer seien, meinte einer 
der Club-Honoratioren: “Ich glaube, 
einer - wenn ich mich nicht irre, aber 
der macht wohl nichts mehr damit.” 


Mailboxen zum 
Anfassen 

Im Bereich der Datenfernübertragung 
läßt sich seit längerer Zeit ein Trend hin 
zu den Mailbox-Netzen beobachten. 
Der Typ des Einzelkämpfers scheint 
unter den Sysops (Betreibern von Mail¬ 
boxen) “out" zu sein. Durch Vereinheit¬ 
lichung der benutzten Mailbox-Soft- 
ware und ein ausgeklügeltes Weiterga- 
besystem für die gesammelten Daten 
erreichen die in Netzen zusammenge- 
faßten Mailboxen riesige Anwender¬ 
kreise - verglichen mit den klassischen 
selbständigen Boxen, bei denen jeder 
Sysop seinen Datenbestand für sich 
pflegen muß und der Austausch von 
Nachrichten über “schwarze Bretter” 
auf die Teilnehmer der betreffenden 
Einzelbox beschränkt bleibt. 

So war es kein Wunder, daß sich auch 
verschiedene Mailbox-Netze in Stutt¬ 
gart präsentierten. Da gab es zum Bei¬ 
spiel den Stand des süddeutschen Mail¬ 
boxvereins mit Hauptsitz in Stuttgart. 
Das ist ein Verband nichtkommerziel- 



Der Karlsruher Versender Buhler zeigte neuen 
"Ernsthaftem" auch skurrile Kuriositäten wie 
das musikgesteuerte Frosch-Orchester Green 
Machine ” 



esuclue Buch-Klassiker zu ä-tSit-Computer- 
slemen konnte man beim IDEA-Verlag. 
ich he im. ergattern. Auch für den CPC war 
niges dabei 



Am Stand der Point GmbH aus München fan¬ 
den wir dieses "Best"-Taschenmodem - ideal 
für mobile Hacker. Zum Milnehmen auf DFÜ - 
l'reffs genau das richtige 
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lerMailbox-Betreiber(Sysops),diemit 
ihren insgesamt 18 Boxen an das weit¬ 
verbreitete FIDO-Netz angeschlossen 
sind, und ihrer Benutzer. Gegen einen 
Jahresbeitrag von mindestens 10 Mark 
erhalten die eingetragenen Benutzer in 
den Boxen des SDMV erweiterte Zu¬ 
griffsrechte und einen PD-Service zu 
vergünstigten Konditionen. Der 
SDMV legt großen Weit darauf, daß die 
unter seinem Dach zusammenge¬ 
schlossenen Boxen von Idealisten ohne 
kommerzielle Interessen betrieben 
werden. Mitgliedsbeiträge und PD- 
Verkäufe tragen nur dazu bei, einen Teil 
der Selbstkosten aufzufangen. Und die 
entstehen unweigerlich: etwa in Form 
von Telefongebühren beim allnächtli¬ 
chen Updaten der Datenbestände für je¬ 
de einzelne Box. 

Ein weiteres Mailbox-Netz, dessen 
“Kopf” sich in Stuttgart befindet, nennt 
sich “MAUS” und präsentiert stolz 41 
angeschlossene Boxen. Hier ist man 
sehr stolz darauf, auch im Bereich der 
neuen Bundesländer schon eine Box zu 
haben - genauer gesagt: in Rostock. 

Überraschungen 

Ein Mailbox-Netz besonderer Art ist 
das “Lilenet”: Es versteht sich als Ge¬ 
sprächsforum für Leute, die nicht bloß 
technische Informationen oder Spiele¬ 
tips austauschen wollen, sondern sich 
auch für die tieferen Fragen des Lebens 
interessieren. Die Betreiber der “Life- 
net”-Boxen sind engagierte junge Chri¬ 
sten, die das “Hacken” mit dem Com¬ 
puter als Äußerung ihres Glaubens se¬ 
hen. Claus-Peter Walny aus Aalen bei 
Stuttgart brachte mit seiner Mail box 
“Lebensinterface” 1987 den Stein ins 
Rollen. Aus der C-64-Crackerszene 
stammend, hatte er nach dem “Aufflie¬ 
gen” seiner Gruppe “Sektion 8” 
zunächst die Computerei an den Nagel 
gehängt. Als sein Leben eine völlige 
Neuorientierung erfahren hatte, sah er 
für sich den Auftrag, seine Erfahrungen 
in den Dienst des neugewonnenen 
Glaubens zu stellen und gründete die 
erste christliche Mailbox Deutsch¬ 
lands. Inzwischen haben sich 20 weite¬ 
re Boxen angeschlossen. Das “Lifenet” 
bietet heute einen ähnlich umfassenden 
Informations-Service wie andere Netze 
auch. Es gibt “Bretter” für Diskussio¬ 
nen, Buchkritik und Musik, eine “Frau¬ 
enecke” und eine “Pinnwand”. Was be¬ 
merkenswert ist: Die User brauchen 
keinen Beitrag für die Teilnahme am 
Mailbox-Betrieb im “Lifenet” zu be¬ 


zahlen. Für diejenigen DFÜler, die ein¬ 
mal hineinschnuppern wollen, nannte 
uns Walny die Nummer seiner Box: 
07361/43640. Zwar laufen im Netz 
hauptsächlich PCs und Ataris, aber 
man kommt auch mit einem einfachen 
Terminalprogramm auf dem CPC pro¬ 
blemlos durch. 

”Ei des Kolumbus 9 ’ 
für Selbstreparierer? 

Wenn's am schönsten ist, soll man auf¬ 
hören - und auch die “l lobby + Elektro¬ 
nik 91” entließ uns irgendwann aus 
ihren Hallen. Beim Hinausschlendern 
noch schnell ein Blick auf Trends und 
Renner dieser Messe gefällig? Bitte 
sehr: 

Nach “Super”- und “Sekunden ”-KIe- 
ber kommen jetzt weiterentwickelte 
Tropfen-Klebstoffe, die alle Materiali¬ 
en außer Teflon, vor allem auch flexible 
Kunststoffe, sicher verbinden sollen. 
Einer dieser an vielen Ständen verkauf¬ 
ten “neuen Kleber” kam von der Firma 
“Schwanheimer Industriekleber” aus 
Schwanheim (woher wohl sonst?). 
Gummi auf Stein, PVC auf Metall, Me¬ 
tall auf Holz - es sah witzig aus, schien 
aber tatsächlich zu halten. 

Ein zweites stark verkauftes Trend- 
Produkt: ein spezielles Lötmittel, das 
dem ansonsten schwierigen Löten von 
Aluminium seinen Schrecken nimmt. 

Bis nächstes Jahr! 

Insgesamt gesehen hat sich diese Mes¬ 
se für uns gelohnt - wie man dem offizi¬ 
ellen Abschlußbericht entnehmen 
kann, auch für Aussteller und Veran¬ 
stalter. Über 80000 Besucher seien an 
den vier Tagen dort gewesen, sagt der 
Bericht. Von den 428 Firmen aus 13 
Ländern seien 94 Prozent mit dem ge¬ 
schäftlichen Erfolg zufrieden gewesen. 
Die nächste “Hobby + Elektronik”, so 
heißt es, wird auch 1992 wieder zusam¬ 
men mit der “Modellbau Süd” stattfin¬ 
den, und zwar vom 5. bis 8. November. 
Wir freuen uns drauf— hoffentlich be¬ 
kommt die Stadt Stuttgart dann die Ver¬ 
kehrsregelung besser in den Griff als 
diesmal. Auch die Messeveranstalter 
müssen in puncto Koordination noch 
dazulernen. Oder aber wir müssen uns 
auch nächstes Jahr wieder wie die Ein¬ 
brecher durch abgesperrte Bretterver¬ 
schläge schummeln, um vom Presse¬ 
zentrum aus zu den Hallen zu gelangen. 
Bis dann! 

(sz) 



Claus-Peter Walnv, Sysop der Aalener "Le¬ 
hen sintcrface '' - M ailhox mul Initiator von 
‘‘Lifenet". dem ersten christlich orientierten 
Mailbox-Netz in Deutschland 



Die Leute vom Mailbox-Netz “MAUS" lockten 
nicht nur mit Mini-Mäusen zum Naschen, son¬ 
dern auch mit der funktionstüchtigen “Blau¬ 
pause" einer kompletten "MAUS" Mailbox 
zum Ausprobieren 



Beim "Süddeutschen Mailbox-Verein " hatten 
auch Computerlaien Gelegenheit, einmal Be¬ 
kanntschaft mit Tastatur und Monitor zu ma¬ 
chen 
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Wir sind Ihr starker 




Amstrad CPC464 6128 Plus 


Z80 A Prozessor • 128 KB Rom Cartridge mit 
AMSDOS • Basic 1.1 und Action • Rennspiel 
Burmin Rubber • DMA - Soundchip • Game 
Paddle Joystid • 4096 mögliche Farben bei 
Colormonitor • 2 Joystick-Anschlüsse • flache 
schreibtreundliche Tastatur* neues modernes 
Design. 

Kaufen Sie einen neuen CPC plus zum 
Superpreis von: 


CPC 464 Plus mit 12" Monochrom Monitor DM 

CPC 464 Plus mit 14" Farbmonitor DM 

CPC 6218 Plus mit 12'* Monochrom Monitor DM 

CPC 464 Plus mit 14" Farbmonitor DM 

Anschluß CPC Plus an externes Zubehör: 


Floppykabel an F01 
l Adapter tür vorh. Floppykabel 


DM 48.» 
DM 39.- 


Adaptekabelsatz für MP2 
weitere Adapter 


599,- 

799,- 

799,- 

1098- 


DM 39,- 
a.A. 



CPC 6128, der 


ideale Computer für den Einsteiger 

mit Grünmonitor GT65.798,~ 

mit Farbmonitor CTM 644 .1098,- 

CPC 6128 Konsole einzeln .698,- 

Grünmonitor GT 65 . 248,- 

Farbmonitor CTM 644 . 598,- 



piele, Entspannung CPC: 


Sorcery Plus <3“).30,- 

Spannendes Geschicklichkeitsspiel mit 
super Grafik. 

Cyrus II Chess (3*) Superschach ... 49,— 
Denksport auf Ihrem CPC 3D Darstellung. 

Flugsimulator 737 pvKas)38,-/28,- 





Adventures CPC (t = Text: g = Grafik) 


Diamant von Raber'eb (g) 

Drachenland (t) 

Ro so durch die Zen (t) 

Sho'lock Flolnes (g. nur 3'Oiskena) 

Auftrag in der 8*onx (g) 

Insel cer Smaragce <t) 

Pha*aonengrab (t) 

|e 3 Diskette , Kassette 38,— / 28,— 



Grafik auf CPC: 


-’L 


EASIART + Trackerball.178,- 

Zeichnen und Konstruieren mit dem Marconi 
Trackerball und dem Grafikprogramm EASI-ART. 
Unschlagbar in Kombination mit StopPress II 

EASIART» Trackerball +StopPress „348,- 

EASIART Softw. u. Handb.78,- 

Maus mit Grafiksoftware.149,- 


Arnor: 


Prowort. 

.198,- 

MAXAM 3" . 

... 94,- | 

Prosnoll dlsch 

.. .79.- 

1 STAR DIVISION: 

i Star-Writer 1. 

...98,- 

I Datei-Star.. 

.... 98,- 

Statistic-Star. 

...98,- 

FibuStar Plus CPC ... 

.298,- 

CPC-Knüller: 


1 ROMBOX CPC. 

..118,- 

MICA CPC.„„... 

.98,- 

Terminalstar 3". 

... 29,80 

Mini Office 113-_ 

98,- 

Dan-Scanner (»). 

.249,- 

Videodigitizer (+). 

.348,- 

(»(Adapter CPC 6128 39,- 

CPC + Joyce) 

; Supercalc . 59.80. 

Van der Zalm: 


ADRESCOMP. 

.58,- 

DATENREM ........ 

.68,- 

:• FAKTUREM 

.78,- 

| FIBUPLAN.. 

148,- 

: LAGDAT. 

.68,- 

ii TEXTKING . 

.78,- 

:COMFORM . 

..48,- ! 

ii ETATGRAF. 

.. 58,- 

Ij FIBUCCMP.. . 

.98,- 

ij KALKUREM - 

.. 78,- 

PROFIREM. 

138,- 

Vereins Verwaltung 

198,- 

Grafik Knüller 


StopPress 


DTP Programm 

178,- 

StopPress Fonts. 


Ciiparts (nur CPC), 

... 98,- 

AMX Maus (Joyce) 

. 248,- 

StooPress + 


AMX Maus (Joyce) . 

. 298,- 1 


Neue CPCSpiele 3" 

Hollywood: Robocop, 
Ghostbusters, Batman, 

Indiana Jones..89,95 

Virtual Worids: Driller, 

Total Eclipse. Castle Master 

ThoCrypt.79,95 

Rick Dangerous 2.49,95 

Sim City.69,95 

Spiele Kassetten: 

Sonderpreis.je 20,- 

IHllLiate anfordern Hill .. 

Sonderpreise: 

Bildschirmfilter 

tür GT64-65, 

CTM 644-640 . 29,- 

Abdeckhauben: 

CPC Monitors.je 39,80 

DMP-Drucker.je 29,80 

DDI/FDI/Vortex je 1980 
CPC Konsolen ... je 24,80 

Joyce Monitor.44,80 

Joyce Tastatur.24,80 

Joyce Drucker...„.24,80 

3"-Disketten. 

Maxell, Amsott (tost,) 59,- 

CF2DD (lOSt.) . 98,- 

Noname <i0St.)_.49,- 

Diskettenboxen: 

3"-3,5" /50.19,80 

3--3.57100.29,80 

5,257100 .29,80 

POSSO BOX 150 3" 59,- 

Schnittstellen: 

RS 232 Joyce.198,- 

Monitore 

GT 65. 248,- 

CTM644.598,- 


CPC 


Kassettensoftware: 

Easi-Topcalc Kas.29,80 

Basic Lehrbuch Kass 29,80 
Mini Office II Kassette 

Textverarbeitung.49,- 

Hisoft Pascal.39,80 

Assembler.„...39,80 

Programmierspr. 3": 

Hisoft Pascal.59,80 

Assembler.59,80 

Amor C (CPC 6128) 225,- 
Turbo Pascal 3.0 . 225.-- 

Handbücher Deutsch 

für CPC; 

Mini Office II.29,80 

AMX-Maus CPC .29,80 

StopPress CPC ..19,80 

dk tronics Erw-19,80 

Protext .. 19,80 

MAXAM.19,80 

Supercalc.19,80 

61 28 deutsch.. 68,- 

6128 englisch.48,- 

fürjoyse; 

AMX-Maus Joyce.19,80 

Mini Office Prof.29,80 

Public Domain Buch 29,80 

MasterScan.19,80 

StopPress Joyce.19,80 

Desktop Pu bl is her.... 29,80 

MICA .. 39,- 

LocoScript2 .59,- 

locoFile...59,- 

Public Domain: 

Riesen Auswahl an toller 
Software II (Liste anford.) 

1000 PD (3").je 20,~ 



: Schaltpläne für: [ i 

•CPC 464/664/6128. 

je 29,80 

• CTM 644/640. 

je 19,80 

• GT 64/65. 

je 19,80 

• DD1 / FD1 ... 

19,80 

• DMP 2xxx/3xxx. 

29,80 

•Joyce 8256/8512. 

29,80 



ISpielesammlungen - Ganz stark !| 

Mindestens 3 Spiele auf einer 3“-Diskette: 

Super Games 1 (4 Spiele). 

*.*.30,- 

Super Games II (4Spiele). 

30,- 

Super Games III (3 spiele). 

„30,- 

They sold a million (4 Spiele) 

.30,- 

GAME Paket alle 14 Spiele . 

.100,- 




mit MailMerge 

TcKlwiramertunrj 


dBase II für CPC / Joyce (3") 

Jeder PC Besitzer kennt dieses relationale 
Datenbanksystem von ASHTON TATE. Diese 
Software eignet sich zur Lösung aller Anwen¬ 
dungsprobleme . wie Lager-, Adressverwalt- 
ung, Fakturierung Betriebsabrechnung etc. 

(bis zu 65536 Datensätze) AchtungI CPC 
464 -664 Besitzer benötigen eine 64 KB 
Erweiterung 

Mit deutschem Handbuch -| 48 -- 

Wordstar 3.0 

MicroPro für CPC/Joyce 

Profitieren auch Sie vom Nutzen eines 
millionenfach bewahrten Textverarbeitungs- 
programms und erledigen Sie alle Schreib¬ 
arbeiten auf eine schnelle und komfortable 
Art und Weise. 

464- 664 Besitzer benötigen eine 64 KB Er. 
Mit Serienbrieffunktion _ _ 

Mit deutschem Handbuch 


Profiprogramme aus der 

PC - Welt 


Wir haben den Alleinvertrieb für dBasell, 
Multiplan, Wordstar 3.0 und Microsoft 
Basic (CPC+Joyce) von MarkI & Technik 
übernommen I Sollten Sie also Interesse 
an einer durch und durch professionellen 
Software für Ihren CPC oder Joyce 
haben, dann zögern Sie keine Sekunde 

Software Paket 

dBase II + Wordstar ♦ Multiplan zum 

sensationellen Paketpreis von 298,-- 

Handbuch (auch einzeln erhältlich) 

49,- 


tifitfliff 

Multiplan Microsoft CPC / Joyce (3 i 

jlüi 

FWiKfrmlvrfui* Plnntirxpirtymrrr 

Ja. So haoen richtig gelesen, das bewährte 
Tabo enkaiKuiat onsprogramm gibt es auch 
für Ihren Computer Wenn Sw dw zel- 
raubence manuelle Verwaltung tabellarischer 
Aufstellungen von Hanö satt haben, ist 

Multiplan genau das Richtige tOr Sie 

CPC 464-664 Besitzer benötigen eine 

64 KB Erweiterung CPC 99,— 


Mit deutschem Hb. Joyce 148 ~ 


Handtoranfragen erwünscht. 



Basic-fAssembler cPC6i28/Joyce 

Komplettes EntwickJungspaket mit: Basic- 
Compller 5.4 Basic-Interpreter 4.51 und 5.21, 
Macro-Assembler, Link Kinking Loader.Cfet 
Cross- Referenc Facility und Lib Library 
Manager. 

Ein Muli für |eden ernsthaften Basic-und 
Assembler Programmierer II CPC 99,— 
Mit deutschem Handbuch Joyce 148,— 













































































































































































































Joyce PCW 8256: Joyce PCW 8512: 

• 3'-Laufwerk (180 KB) • 3"-LW (180 * 720 KB) 

• Drucker ♦ Toxlsoftware • Drucker + Textsottware 

• CPM Plus und Basic • CPM-Plus und Base 

•256KB 998 - -512KB 1398,- . 

Amor: 

Amor C. 225,- 

C jetzt euch Für den Joyce und 
CPC 6128 Mit Compiler Linker 
und Editor. 

Joyce-Knüller: 

Desktop Publlsher.98,- 

... + AMX-Maus (+->....298,- 

MasterScan (♦-). 298,- 

Mini Office Profess,.... 138,- 
...Dtsch. Zeichensatz ...29,80 

Tasword 8000.148,- 

Turbo Pascal 3.0.225,- 

Turbo Toolbox.148,- 

Textverarbeitung mit Recht- 
8chreibprüf. und Mailmerge 

PROSPELL (dl)_ 79.- 

VAX AM 11.23»,- 

Locomotive: 

Prompt (Datei) .69,- 

Prompt Druck.39,- 

LocoScrpt - Spell . 248,- 

STAR DIVISION 

Turbo Adress .98,- 

Turbo Faktura.148,- 

Headline.198,- 



Datei-Star.9».- 

Mailing-System 189,- 

Star Base_ 198.- 

Business-Siar 298,- 

Flbu-Star Plus ..298.- 

Komenbiatter Ftou 35,90 

Loco-Me-ge. . 93.— 

Comac Kasse Plus.168,- 

Comac-Banktransfer ...59,50 

Vereinsverwaltung.198,- 

Schreiblehrgang.89,- 

Fleetstreet Edit.148,- j 

FISKUS 90/91 .139,- 

WS-Tuner.49,80 




Joyce 


Diverses: 

Datenrekorder + Kab. 98,- 
Druckerkabel. 6128.38,- 
Druckerkabel 464/664 38,- 
Monitorverlängerung: 

...CPC 6128.29,80 

...CPC 464.24,50 

Druckerveriangerung: 
für Joyce (2 Kabel) ...58,- 
Trektor NLO401 .58,- 

Joysticks 

Competition pro. 39.80 

Quickshot II. 19.80 

Joystick JY2 mit Anschi, 
lür werteren Joystick. 19,80 


Star LC20 (9-N.).498,- 

NEC P20 . 848.- 

NEC P 60.1598,- 

Slar LC24-10 (24-N.) 698,- 

Farbbänder: 

NLQ401/DMP .„19,80 

StarLC 1CV20 .19,80 

Star LC 24-10.24,80 

LQ 35-/NL10/PCW.24,80 

Joyce (Carbon).39,80 

PCW9512. 19,80 

Star LC 10 .19,80 

Star LC 24-10.24,- 


Neue Joyce-Spieie: 

Anais of Rome.89,- 

Batman.59,- 

Cyrus 3D Schach.49,80 

Matchday II ..69,- 

Tomahawk.79,- 

Catch 23.79,- 

Gnome Ranger. 79,- 

Scapeghoat . 79,- 

Schoots Out..79,— 

Ski Clknb.79,- 

Sporting Triangle.79,- 

Tetris...79,- 

PCW-Adapter {*) 39.- 

Sonderpreise: 

Bildochirmfitter. 49,— 

Papierführunn in 

versch. Farben..'... 19,80 

Achtung !!! 

gebrauchte Joyce 8256, 
8512, geprüft, 3 Monate 
Garantie.Preis a.A. 


Zubehör 


Umweltschutzpapier 
Zweckform 1000 Bl. .24,80 

Endlos 1000 Blatt.29,80 

weiß 

Etiketten 200 Stk.16,- 

70 x 70. für 3" und 3,5" 

Datenübertragung 

Dalaphon 2400 b.698,- 

Modem 2400 MNP5. 398,- 
Modom 2400 Baud ... 348,- 
Alle Modems sind ohne 
Postzulassung 
Software DFÜ ..58,-- 



BTX Modul für CPC 


CPC BTX Modul für 464/664/6128 

mit Kabel, keine Software nötig.ln Verbindung 
mit einem MP 2 auch am TV betreibbar. 
Anschluß mit DBT03 gg . 


ProSCAN 


Handscanner für PCW S/**** 
ProScan Software Installationsan. In deutsch 
mit englischem Handbuch. 798 ■ 



Multiface 2 


Sagenhaftes Kopiermodul I 

- Vollständige Kopiereinrichtung für Kassetten 
und Disketten. 

- Wird auf den Expansionsporl Ihres CPC 
(464,646 und 6128) aufgesteckt. 

- Wahlweise Kopieren von Kas. aul Disk, und 

umgekehrt. -J78 . 

Adapter für CPC 6128 (DM 39,-) 



Neu !! Loco Script PC in deutsch 




endlich auch für die MS PC DOS Welt 

Darauf haben alle gewartet, die auf einen 
DOS-Rechner umsteigen wollten. Sie können 
Ihre Datenbestände v.PCW auf den PC über¬ 
nehmen. Im Lieferumfang enthalten: 

-Loco Script CQO - Loco Mail 

- Loco Spell DiJÖ, . l oco pqi e 

- englisches Handbuch 


Wir haben die Lizenz für Kotulla PD-Programme (CPC u. Joyce) 
mit deutschen Handbüchern übernommen 


j Preiswerte Programme für CPC und Joyce so macht Soflwa’e Spaß I 


JRT Pasca. vollständiger Pascal -Conpiier ’ 
Z80-Assembler, Disassemtler. Linker, Debugger 
Künstliche Intelligenz • XUSP u E-PROLOG * 
C-Compiler Small-C - mit Fließkommazahlen * 
FOHTH-83 - Komlcrtabiar Forlh-Interpreter 
Utilities: Dateikompassion, Diskmon., Dateiretter 


Programme aus dem Großen CPC-Arbeitsbuch ** 17 
j 8 Adventure Cdosaal Cave (Pg. engl,) * 18 

:9 Disk Utilities - kopiert geschützte Software ** 19 

■ 10 BizBasic • Umfangreiche Basic-Erweiterung ’* 20 

| * Auf CPC-464/664 nur mit Speichererweilerung 


Basic-Compiler E-8ASIC für CP/M 
Turbo Pascal-Programme -Turbo-Intiner, Grafik 
Programme aus Den Joyce programmieren 
Programme aus CPC-Doteiverwaltung ** 

Wordstar-Tods - Fußnoten, Index, Spallendruck* 
dBASE-Literarurverwaltung * 

C-Interpreter SO - Spielend C lernen * 
MacroPack/ZBO • Makroassembler, Debugger, Linker 
DFÜ-Programm MEX - Datenübertragung * 
WS-Tuner 


(min. 64 K) ** Nicht geeignet für Joyce 
nur DM 25,-- pro 3"-Disketto DM 60,- für drei beliebige 3“-Diskeften 




am 



Kopierprogramme: 


Mastercopy CPC (3").65,- 

Supercopy CPC/Joyce (3-) 65,- / 85,- 
Suporcopy ist wie der Name schon sagt ... 

Disk-Tools (3)... 79,- 

Unn/orselles Disk-Utility 9 Programme 
Formatieren. Kooieror. Analysieren 


AMSTRAD 3"-Laufwerke: 


DD1 (inkJ. Corrtr.)..398,- 

Eln Muß für|eden CPC 464 -Besitzer 
Controller (auch einzeln erhältlich) 198,- 

FD1 (2.-Laufwerk CPC) 3" 198,- 

Acnturtgi Lauft am CPC 464 nur mit Contr 
Kabel‘urFDl nötig für 6128'664 48.- 

FD4 (2.-EmbajLau!w Joyce) 3" 398,— 


Zweit-Laufwerke Festplatten 


3,5” LW (CPC / Joyce). je 240,- 

Achtungl Läuft am CPC 464 nur mit Contr. 

5,25” LW (CPC/Joyce). je 320,- 

Achtungl Läuft am CPC 464 nur mit Contr. 
Metallgehäuse. (inkl.Kabel anschlußfertig) 
DiakpBra 3,5” / 5,25 " Formatsoftware 78,-- 

HD 20 (CPC 464 664/6128) 1100,- 
77P7, 

64 KB.149,- 

1 28 K B nicht für 61 28.. 1 98,- 

256 KB.269,- 

320 KB nicht für 6128 .349,— 

512 KB.419,- 

Joyce 256 KB(mit Einbauanieit.). 128,— 


Speichererweiterungen CPC: 


CPC-Renner von AMSTRAD: 


M P3 fTV-Tuner") . 199,- 

Aus Ihrem CTM644 - Color-Monit. wird ein 
Farbfernseher. 

CT-1 (‘Radio-Uhr-TimeO. 79,— 

Radiowecker mil Einschlafautomatik. Passend 
zum CPC-Design. 


Locomotive Software 


LocoScript2 (Textverarbeitung) 148,- 

mit deutschem Handbuch 

LocoSpell2 (Rechtschreibung 168,— 

in deutsch mit engl. Handbuch 

LocoFilo (Datenbank) 168,— 

für LocoScripf2 mil deutschem Handbuch. 

Loco Font Set 1 oder 2 79,80 / 68,40 



i LocoMail2 (Senenbrief). 168,- 1 

j für LocoScript2 mrt engl. Handbuch. 

F 33 

Datenübertragung CPM - DOS: | 

MINI DOS JOYCE.50,- 

Mit Hilfe dieser Software können Sie auf Ihrem 
Joyce PCW MS-DOS-Dateien lesen, schreiben 
und formatieren. Sie benötigen dazu ein 3,5*- 
: oder 5,25" Diskettenlaufwerk 


Karl-Heinz Weeske 
Potsdamer Ring 10 
D-7150 Backnang 

Kretssparkasse BK ‘BLZ (60250020) 
74397- Postgiro Stgt 83326-707 


I zurück an Absender Ö 2/3 92 

■ Interessiert an weiterem Info- 
' material ? Kostenlose Gesamt- 
| angebotslisten anfordern ! 


COMPUTER-ELEKTRONIK 

Zantung per Nachnahme oder Vorauskas- 
so. Versandtoslenpauschale Inland 7,60 
DM (Ausland 19,$0 OM) 

Fax: 07)91-60077 
Td.: 07191-1528(29), 60076 


o für CPC 6128 . 664.464 
O Joyce / PCW Computer 
O Spiele CPC / PCW 
O Public Domaine 3" CPC/PCW 


Vorname. Name: 
Straße. Hausnummer: 
PLZ. Ort 


Teiefon-Nr. Datum 


Mein Computersystem 


J 






































































































































































































































Bericht 



It’s Party Time 

CPC-Fachkongreß ohne Schlips und 
Kragen 

Lange wurde sie angekündigt, lange wurde sie geplant und ebenso lang hat es 
gedauert: dieBMC-Party 1991. Die erste internationale und völlig legale Co- 
pv-Party. 


Deutschlands CPC-Cracker Nummer 
eins - die Rede ist von BMC (Black 
Mission) - hatte die Aufgabe, die erste 
internationale CPC-Copy-Party auf die 
Beine zu stellen. 

Hierzu waren die wichtigsten Cracker 
aus allerlei Ländern angereist. 

Deutschland: 


Black Mission, The Saurian, Thriller, 
WEEE, BSC, Mickey, The Rat, Boris & 
Merlyn of Class, DJH, LTP, Excalibur, 
KNS^MCS 

Frankreich: 

Logon System (Longshot, Fred Crazy, 
Pict, Overflow, Rubi, Digit, Naminu, 
Digit’s Freundin Valerie und SlasITs 


Freundin Christel), Poum & Robby von 
der französischen CPC-Zeitschrift 
“Cent PourCent” und Fefesse 

Holland: 

Dragon Breed Wetware (Freaksoft & 
CaptainPete) 

Norwegen: 

Flash 

Dänemark: 

JLCS, New Way Cracking 
Österreich: 

Elmsoft, Warlock 
Schweiz: 

Asterix & TMP 

Insgesamt trafen sich fast 40 Leute, wo¬ 
bei The Saurian sicherlich etwas über¬ 
fordert war, da er, als einziger motori¬ 
siert, alle vom Bahnhof abholen durfte. 
Nach längeren Begrüßungszeremonien 
ging es gleich zur Sache. WEEE sowie 
Merlyn versuchten, ein Dialogkabel für 
den Tape-Port zu basteln. Dies funktio¬ 
nierte natürlich nicht, und so versuchte 
sich Merlyn an einer Platine, die einen 
Sampler geben sollte. Wieder einmal 
war der Alkohol schuld, und auch die¬ 
ses Vorhaben scheiterte. 

Noch am Freitag abend traf auch Elm- 
soft ein, der erst einmal alle zum Stau¬ 
nen brachte. Auslöser waren die neuen 
Parts für seine Chain-Demo sowie sein 
neues Spiel (CYBORGS). Dieses war 
es dann auch, was The Rat und Mickey 
einen spielreichen Abend bescherte. 
Der hohe Schwierigkeitsgrad dieses 
Spiels bewirkte, daß das eben genannte 
Duo nicht einmal den ersten Level ge¬ 
sell afft hat. 

Jetzt wurden erst einmal Fotos ge¬ 
schossen. und dann kam die große 
Überraschung: “CRACKERS INTER¬ 
NATIONAL”, Nummer 7 - ein Fanzi¬ 
ne der deutschen CPC-Szene - war da! 
Jeder wollte eine haben, und man hörte 



Endlich sind die Franzosen da 



Die CI gehl we# wie wanne Semmeln 
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Schlafen kann man in (fast) allen Laxen 


lange Zeit nichts, bis die CI vollständig 
verschlungen war. Ganz nebenbei wur¬ 
de dann der Vertrieb für die nächste CI 
gesichert (Originalton Thriller & 
WEHE: “Irgendeiner muß ja die 
Drecksarbeit machen.”). - Pict & Fred 
Crazy versuchten am nächsten Tag vor 
lauter Begeisterung, Thriller zu überre¬ 
den, die CI doch in Englisch zu verfas¬ 
sen. Dies wurde jedoch von Thriller 
schnell ausgemerzt (“CI ist Kult in 
Deutschland-aber in Deutsch.”). 

Als die CI ausgelesen war, verzog man 
sich langsam Richtung Compi. Dort 
hackte BSC mit seinem ROM-Super- 
mon, Witze wurden erzählt, und das be¬ 
reits genannte Spiel CYBORGS wurde 
gespielt. 

Invasion der Frenchies 

Am Samstag morgen trudelte dann der 
Rest langsam ein. So die Schweizer 
(“Grüazi i-ch bien Aschteri-ch-s und 
währ bies duuu?”) und die Franzosen. 
Beim Eintreffen der Franzosen ertönte 
aus aller Munde der Ruf: “Invasion der 
Frenchies!" Und da kamen nun Logon 
System, Fefesse, Poum und Robby. 
Nachdem die ersten Verständigungs¬ 
probleme per Englisch gelöst waren, 
wurde es BSC doch etwas mulmig, als 
Asterix alle vorstellte. Dies begründete 
sich darin, daß BSC mit Logon System 
etwas im Klinsch lag. Doch kaum war 
der CPC 6128 plus aus dem Auto ge¬ 
holt, sah man Longshot und BSC vor 
selbigem in unverständlichem Eng- 
lisch-Deutsch-Französisch-Gemisch 
fachsimpeln. 

Fefesse fing währenddessen an, eigene 
Sounds vorzuführen, die alle für gut be¬ 
fanden. Als WEEE dann jedoch mit 
dem Killing-Fist-Intro-Sound loslegte, 
waren nicht nur die Franzosen erstaunt. 
Als absoluter Hammer wurden nun ei¬ 
nige Konsolenspiele auf dem 6128 plus 
ausgetestet. Als absolute Hits erwiesen 
sich Pang sowie Tennis Cup II, Robo- 



"Erst mul scheuten, was der 'plus' so alles drauf 
hat..." 



Auf engstem Raum jede Menge CRC und vor 
allem gute Programmierer 


cop II und Navy Seals. Andere Spiele 
wurden einfach links liegengelassen. 

In der Zwischenzeit arbeiteten die 
Franzosen an der Partydemo oder spiel¬ 
ten ein wenig mit Poums Soundpro¬ 
gramm EQUINOXE. Einige saßen die 
ganze Zeit nur herum und tranken Bier, 
während wiederum andere Demos ko¬ 
pierten, fachsimpelten oder sich auf der 
Terrasse sonnten. 

Mittlerweile zeigte BSC, wie es auf 
Partys wohl schon üblich ist, Spectrum- 
Demos auf Video. 

In der Nacht von Samstag auf Sonntag 
war dann nicht mehr so viel los, da die 
meisten über kurz oder lang zu übermü¬ 
det waren und irgendwann einschliefen 
(WEEE sogar über seiner Tastatur). 
Sonntag traf man sich dann draußen 
zum Gruppenfoto für die “Amstrad 
Cent PourCent” Nachdem dann schier 
unendlich viele Fotos geschossen wur¬ 
den (in der prallen Mittagssonne), ging 
man wieder hinein. Es wurde mit Robby 
geredet, Fred Crazy und Mickey blödel¬ 
ten rum, PANG wurde gespielt und... 
Zwischendurch wurden dann noch 
Adressen für Logon System aufge¬ 
schrieben, da jeder die Ausgabe der 
“Cent PourCent” mit dem Partybericht 
bekommen sollte. Nach einigen Grup¬ 
penfotos (mal wieder) wurde von den 
Redakteuren der “Amstrad Cent Pour 
Cent” an BMC ein Pokal für die erste 
internationale und legale Copy-Partv 
überreicht. Dies ist natürlich auch mit 
etwas Verantwortung verbunden, denn 
zu der nächsten Party muß BMC auch 
anreisen, um den Pokal an den neuen 
Organisator weiterzugeben. 

Gegen 17 Uhr mußte ich leider fahren, 
aber die nächste Party kommt be¬ 
stimmt ... 

European Meeting Demo 

Wie schon erwähnt, begann man auf der 
Party mit einer sogenannten Meeting 
Demo, die jetzt endlich fertiggestellt 


wurde. Hierein kurzer Test: Die gesam¬ 
te Demo läuft im Overscan-Mode, die 
Grafiken sind von BRAD/Logon. Nach 
dem Start erscheint eine BATMAN- 
Grafik auf dem Bildschirm, die durch 
eine Sprechblase ergänzt wird. “This is 
another Logon Demo”, steht in der 
Sprechblase. Kurz darauf erscheint das 
Logon-Logo, und los geht es mit Part I: 
Im unteren Bildbereich läuft ein Scroll- 
text in allen möglichen Variationen (Si¬ 
nus, Wave). Der Zeichensatz gleicht 
dem aus der Fucking-Exams-Demo. Im 
oberen Teil des Bildschirms erscheint 
in Blau eine Art Ghostwriter, der die 
Credits, Greetings und Infos enthält. 
Drückt man nun <SPACE>, bekommt 
man erst einmal einen Lachanfall. Das 
Bild ist einfach herrlich. (MB: “Ich 
wußte gar nicht, daß Ralf Schößler Mo¬ 
dell gestanden hat.” - RS: “Ich weise 
darauf hin. daß ich weder auf der Party 
war, noch irgendwelchen Blickkontakt 
zu BRAD habe. Die Grafik ist frei er¬ 
funden. und eventuelle Ähnlichkeiten 
sind sichernicht beabsichtigt...”) 

Milten durch das Bild läuft ein Sinus¬ 
scrolling mit der Auflistung al ler an der 
Party Beteiligten. Mit den Tasten <1> 
und <2> kann gewählt werden, ob der 
Scrolltext vor oder hinter der Grafik ab¬ 
laufen soll. 

Ganz unten am Bildschirmrand findet 
sich ein farbenfroher Scroll, der etwa 
fünf Mode zwei Zeichen hoch ist. Mit 
<TAß> und <CAPS LOCK> ist nun 
noch die Auswahl von zwei verschiede¬ 
nen Sounds möglich. Der erste Sound 
ist eine Art “THE DEMO-Sound-Re- 
mix”, der andere wurde mit dem 

Soundprogramm EQUINOXE kompo¬ 
niert. 

Anbei noch eine kleine Bewertung: 
Grafik: 97% 

Programmierung: 87% 

Ideen: 72% 

Sound: 88% 

Gesamteindruck: 94% 

Mike Behrendt/rs 
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Wo, bitte, geht’s 
nach Bak*Nang? 

Zu Besuch in Weeskes 
CPC-Eldorado 


Diesmal führt unsere “Personality” in eines der letzten 
Reserv ate unseres Landes, in denen man sich als CPCler 
noch so richtig zu Hause fühlen kann. Was den CPC, das 
Zubehör und die Software dazu angeht, ist die Firma 
Weeske v ielleicht der größte Händler in Deutschland. Zu 
den allerersten, die die kantigen dunkelgrauen Amstrads 
schon kurz nach deren Erscheinen betreuten, gehört das 
Familienunternehmen auf jeden Fall. 



6. Dezember 1991, Nikolauslag. Punkt 
sechs Uhr steigen wir ins Auto. Wo in 
aller Welt liegt “Bak-Nang”? Zum 
Glück wohl doch nicht in China - der 
Atlas zeigt uns eine beschauliche 
Kleinstadt an der Murr, in der Nähe von 
Stuttgart, und das Ding schreibt sich 
richtig "Backnang”. Aha. 

Auf dem Weg vom nordhessischen Re¬ 
daktionsstandort bis ins Schwabenland 
umgibt sich die Landschaft dann Zuse¬ 
hens mit einem weißen Reilliäubchen. 
Unser Ziel erwartet uns schließlich mit¬ 
ten im Flechtwerk der steilen Hügel¬ 
straßen Backnangs: ein Ladengeschäft, 
dessen zwei computergefüllte Schau¬ 
fenster nicht im entferntesten erwarten 
lassen, was sich an Verkaufs-, Versand - 
und Werkstatträumen dahinter verbirgt. 

Von Anfang an 

Karl-Heinz Weeske ist eigentlich kein 
“echter” Schwabe. Seine Sprachmelo¬ 
die verrät noch immer, wo er her¬ 
kommt: “aus'n Ruhrgebiet”. Nachdem 
es ihn beruflich zu einer großen Elek¬ 
tronikfirma nach Backnang verschla¬ 
gen hatte, gründete er im Frühjahr 1963 
sein erstes Ladengeschäft. Dort ver¬ 
kaufte der gelernte Elektroingenieur 
Radio- und Fernsehgeräte, später auch 
“weiße Ware” (Kühlschränke, Wasch¬ 
maschinen). 

Stetiges Wachstum, das unter anderem 
die ersten Farbfernsehgeräte bescher¬ 
ten, zwang bald zum Umziehen. Man 
blieb jedoch in Backnang; seit 1971 fin¬ 
den sich Familien- und Geschäftssitz 


am Potsdamer Ring. Ab Mine der sieb¬ 
ziger Jahre veränderte sich der Markt 
im Elektro- und Elektroniksektor dra¬ 
matisch. Das lag nicht zuletzt daran, 
daß erst japanische, später auch taiwa- 
nesische und zuletzt koreanische An¬ 
bietereinen erbarmungslosen Verdrän¬ 
gungswettbewerb begannen. Kleinere 
Fachgeschäfte hatten es zunehmend 
schwerer, Markengeräte an den Mann 
zu bringen, die jeder auch bequem per 
Katalog kaufen konnte. Für Weeske 
hieß das, neue Wege zu suchen. 

Ein schreibtischgroßer HP-Computer, 
der noch heute der heimliche Liebling 
der Seniorchefin ist, sollte 1981 helfen, 
Schwachstellen im Betrieb zu ermit¬ 
teln. Durch die eigenen Erfahrungen 
mit dem Rechner stellte man schnell 
fest, welche Bedeutung der Computer¬ 
einsatz in Betrieben gewinnen konnte. 
Kurz darauf machte die “expert”-Han- 
delskette, an die die Firma Weeske an¬ 
geschlossen war. den Vorschlag, ver¬ 
suchsweise Computer mit ins Sortiment 
aufzunehmen. Karl-Heinz Weeske zö¬ 
gerte nicht lange. 1983 verkaufte er sei¬ 
nen ersten Heimcomputer-einen C-64. 
Produkte von Philips, Atari und ab 
1985 besonders von Schneider, später 
Amstrad, bereicherten das Angebot. 

Um nicht auf die Stuttgarter Region be¬ 
schränkt zu bleiben, entschloß man sich 
im nächsten Schritt, das Ladengeschäft 
durch einen Versandhandel zu ergän¬ 
zen. Das Angebot wurde jetzt durch 
Spezialsoftware für Handel, Handwerk 
und Gewerbe erweitert. Es ergab sich 
dabei, daß speziell der Amstrad CPC in 


Uits "fitst komplette" W eeske-I eam. \ 011 
links: Cordula Weeske ("Kronprinzessin" 
des Unternehmens), Karl-Ileittz Weeske 
( Gründer und Chef). Bernhard Eigen (Ver¬ 
waltung). Ursula Weeske (Mitgründer in und 
Chefin), Gerd Burkhardtsmaier (Werkstatt. 
Schwerpunkt AtarilConimodpre). Rainer 
Domhrnwski (Werkstatt. Schwerpunkt Am¬ 
strad), Hans-Jürgen Damaschke (Verkauf! 
Werbung), Bettina Winter (Buchhaltung). 
Jürgen Bauer (Spezialist für Spielesoftware). 
Es fehlen: Nicole Ziegler und Maria Koszto- 
vics (Versand) 


puncto Zubehör und Software sehr 
reichhaltig versorgt werden konnte. 
Alsdann allerorten das Interesse an die¬ 
sen Rechnersystemen nachzulassen be¬ 
gann. wuchs die Bedeutung der Firma 
Weeske dadurch nur noch mehr. Das 
Ergebnis: eine Marktnische, die nun 
eifrig gepflegt wurde und wird. Zwar 
kümmert sich die Firma Weeske heute 
vom Netzwerk bis zum Spielprogramm 
um alles, was man in der Welt der PCs 
und Heimcomputer braucht. Dennoch 
spielen gerade der CPC und seine Be¬ 
nutzerschaft eine wichtige Rolle. In¬ 
zwischen hat Weeske Distributionsver- 
träge mit verschiedenen CPC-Add-On- 
Firmen, importiert die “Plus”-Serie 
selbst aus England und vermarktet auch 
unter eigener Flagge Software von 
hoffnungsvollen Programmierern. Im¬ 
mer wieder werden auch für “eigent¬ 
lich” längst nicht mehr hergestellte 
Geräte wie GT-65 oder DD-1 noch Lie¬ 
feranten ausfindig gemacht. Für die 
Firma Plesscy, die ihren “Tracker Ball” 
passend zu allen gängigen Computer- 
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Systemen anbietet, übernahm Weeske 
den Exklusiv- Vertrieb. 

Inzwischen ist es nun wieder einmal so 
weit, daß die vorhandenen Räume nicht 
mehr reichen. Aber auch das erst halb- 
fertige neue Domizil muß bereits mit 
herhalten, um Ware aufzunehmen. Die 
Vielfalt an Hard- und Software allein 
im Umfeld von CPC und Joyce ist ge¬ 
waltig, und so treibt gerade der Junior¬ 
chefin das märchenhaft bestückte, aber 
kaum noch zu überblickende Lager die 
Sorgenfalten auf die Stirn. 

Von 3 auf 11 in 28 Jahren 

Der Weg vom kleinen Elektrogeschäft 
zum Computerhaus schlägt sich auch in 
der Größe der Belegschaft nieder: Heu¬ 
te sind es i nsgesamt elf Personen. 

Uns von der CPC-Rcdaktion hatte es 
natürlich besonders der Werkstattbe¬ 
reich angetan. Dort sind Gerd Burk¬ 
hardtsmaier und Rainer Dombrowski 
tagein, tagaus damit beschäftigt. Gerä¬ 
te zu reparieren, zu konfigurieren oder 
- wie etwa im Falle des Zusatzlauf¬ 
werks für die CPC-”Plus”-Serie - 
selbst zusammenzubauen. Die Repara¬ 
turwünsche kommen per Post aus ganz 
Deutschland, und so besteht kein Man¬ 
gel an Arbeit. 

Rainer Dombrowski stammt aus der 
Radio- und Fernsehbranche. Der ge¬ 
bürtige Sachse kümmert sich um die 
CPCs und PCWs. Innerhalb kürzester 
Zeit hat er diese Systeme bis in die letz¬ 
ten Feinheiten kennengelernt-obwohl 
seine Aufgabe bei seinem vorherigen 
Arbeitgeber in der ehemaligen DDR 
auf einem ganz anderen Gebiet lag. 
Nach typischen Fehlerquellen an den 
eingesandten Geräten befragt,meint er: 
“Die meisten Defekte, die beim CPC- 


Monitor auftreten, liegen beim Netz¬ 
teil. Bei den CPCs an sich geht öfters 
mal der Treiberchip für die parallele 
Schnittstelle kaputt.” 

Auf die Firmen Amstrad und Schneider 
angesprochen, nehmen die Männer von 
der Technik kein Blatt vor den Mund. 
Die englischen Firmen seien ähnlich 
eingestellt wie die aus den USA. Das 
Verkaufen sei die Hauptsache. Die Leu¬ 
te im technischen und im Service-Be¬ 
reich seien immer diejenigen, die den 
entstehenden Druck aufzufangen hät¬ 
ten. Kaum ein Kunde habe Verständnis 
dafür, wenn er sein Computersystem 
nach sechs Jahren wegen eines kleinen 
Defekts wegwerfen solle. Schneider je¬ 
doch, so Burkhardtsmaier, habe als 
Rundfunkhersteller die deutsche Men¬ 
talität ins Computerzeitalter hinüber¬ 
gerettet. “Die wissen noch, daß auch re¬ 
pariert werden muß.” Von dort komme 
sogar für die eigentlich längst abge¬ 
schriebene CPC-Serie noch so man¬ 
ches Ersatzteil. “Klar, w enn Sie als Pri¬ 
vatkunde da anrufen. wollen die nichts 
wissen. Aber wo sonst bekommen Sie 
als Service-Mann noch eine Tastaturfo¬ 
lie für den 664 her?” 

Eine tolle Familie 

Das Computerhaus Weeske ist eine Fir¬ 
ma. Aber hinter Firmen stehen Men¬ 
schen. Abseits von Zahlen und be¬ 
triebswirtschaftlichen Fakten wollten 
wir gern noch einige “Statements zur 
Lage” aus den Weeskes herauskitzeln. 
Vater Weeske erinnert sich gern an die 
Zeiten, in denen der CPC noch Stand der 
Technik war. Daß viele Leute sich vom 
Trommelfeuer der Innovationen mit¬ 
reißen lassen, kann er nicht verstehen. 
“Ich habe meine Frau auch schon seit 


mehr als 30 Jahren, ist sie deshalb über¬ 
holt?”. meint er schmunzelnd. Für das 
Gros privater Computeranwendungen 
sei ein CPC durchaus tauglich. Ein w ich¬ 
tiger Grund, heute noch ein solches 
System zu kaufen, liege darin, eine Sy¬ 
stemumstellung zu vermeiden. Die näm¬ 
lich bedeute vielfach, bereits Vorhande¬ 
nes grundlos mit austauschen und eine 
komplett neue Basis schaffen zu müssen. 
Daher weiß Weeske auch zu berichten: 
“Viele Schulen kaufen jetzt wieder den 
CPC 6128.” Selbst wenn die CPCs in 
England nicht mehrgebaut werden, ist er 
optimistisch: Solange es noch Soli- und 
Hardware für CPC und PCW gibt, wird 
die Firma Weeske sie auch anbieten. 
Karl-Heinz Weeske will das Ruder in 
seinem Betrieb aber nicht mehr länger 
selbst in der Hand behalten. Langfristig 
soll seine Tochter Cordula ihn auf dem 
Chefsessel ablösen. Der erst 57jährige 
freut sich auf den verfrühten “Ruhe¬ 
stand”. der so ruhig sicher nicht sein 
wird. Anstatt sich um Markt, Produkte 
und Preise zu kümmern, möchte er das 
tun, wozu er schon immer Lust halle. 
Was das ist? Zum Beispiel: auf der 
großen Werkbank im Keller Spielzeug 
für Kinder bauen, das er dann in Hei¬ 
men oder Kindergärten verteilen will. 
Cordula Weeske, diplomierte Betriebs¬ 
wirtin, hat ihren Einstieg in die Firma 
bereits hinter sich. Flankiert von Vater 
und Mutter (Originalton Ursula Wees¬ 
ke: “Die Mutter wird immer ge¬ 
braucht!”) und unterstützt von ihren 
Mitarbeitern, will die attraktive Blon¬ 
dine das Schiff auch in Zukunft auf 
Kurs halten. Was sie sich wünscht, ist, 
daß das gute Arbeitsklima weiterhin er¬ 
halten bleibt und alle Mitarbeiter Freu¬ 
de an der gemeinsamen Sache haben. 

(rs/sz) 



Rainer Dombrowski in seiner ''Computerklinik". Als Mann der Technik 
hilft er nicht nur defekten CPC-Monitoren wieder auf die Beine 



CPC 6128 und "Plus" einträchtig nebeneinander. Softwareschränke, die 
neben Aktuellem auch rare Klassiker enthalten, laden zürn Stöbern ein 
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Einsteiger 



Daten auf Reisen 

Datenfernübertragung mit dem CPC 

DFÜ, Mailbox, BTX... was ist das? Hier bekommen Sie Antwort darauf . Wir 
sagen Ihnen, wie Sie mit Ihrem Computer die Möglichkeiten der DFÜ nutzen 
können und w as für eine Ausrüstung Sie benötigen. 


Herr H. Acker hat gerade die neueste 
Version seines Super ... -Programms 
fertig. Er möchte es nun seinem alten 
Bekannten, ebenfalls ein begeisteter 
CPC-User, vorführen. Herr H. Acker 
möchte so schnell wie möglich die Mei¬ 
nung seines Freundes dazu hören. Die¬ 
ser wohnt aber seit einiger Zeit sehr 
weit weg. Mit betrübtem Gesicht, er 
glaubt längere Zeit auf die Antwort 
warten zu müssen, macht er sich ans 
Werk. 

Er kopiert das Programm auf eine ande¬ 
re Diskette und beginnt, ein Paket zu 
packen. Auf einmal ein Leuchten in sei¬ 
nen Augen, und er legt die Verpackung 
lächelnd zur Seite. 

Ahnen Sie schon, was die Wandlung in 
der Stimmung Herrn H. Hackers her¬ 
vorrief? Ja, genau, ihm kam die Idee, 
die ganze Sache mittels DFÜ zu be¬ 
werkstelligen. 

Die komfortabelste Möglichkeit ist, 
den Datentransfer über eine Mailbox, 
ein Briefkasten für elektronische Kom¬ 
munikation, laufen zu lassen. Sie über¬ 
tragen Ihre Programme dorthin oder 
holen für Sie bestimmte Dateien dort 
ab. Zusätzlich können Sie auch noch 
die neuesten “Scene”-Berichte studie¬ 
ren. Die Möglichkeit, innerhalb kürze- 
sterZeit eine Antwort auf eine spezielle 
Frage zu erhalten, besteht ebenfalls. 
Außerdem kann man auch schon mal 
einen kurzen “Snak” via Computer mit 
seinem Freund irgendwo auf der Welt 
abhalten. 

Talk via Bits und Bytes 

Um all dies zu realisieren, bedarf es 
nicht eines “486ers”. Man braucht nicht 
einmal einen PC/XT/AT. Dies alles ist 


bereits mit dem guten Achl-Biller mög¬ 
lich, also auch mit unserem CPC. Dabei 
spielt es keine Rolle, ob es ein 464,664 
oderein 6128 ist. 

Obige Probleme betreffen aber nicht 
nur private Computeranwender, son¬ 
dern immer mehr den gesamten Sektor 
von Industrie, Handel, Wissenschaft 
und vieles andere. Generell ist in den 
letzten Jahren der Informationsaus¬ 
tausch stark angestiegen. Schwerpunk¬ 
te bilden dabei eine schnelle Übermitt¬ 
lung der massenhaft anfallenden Infor¬ 
mationen und deren maschinelle Verar¬ 
beitung. 

Um mit dem CPC in dieses Geschehen 
einzudringen, sind vorher einige prin¬ 
zipielle Fragen zu klären. Die Übertra¬ 
gung von Daten aus dem eigenen Rech¬ 
ner an den Rechner des Freundes er¬ 
folgt meist über das Telefonnetz der 
Deutschen Bundespost Telekom. Oder, 
wenn beispielsweise der Nachbar einen 
Rechner hat, über eine kürzere Leitung 
bis zu dessen Rechner. Das Prinzip der 
Übertragung ist stets das gleiche. 

Kein Problem für den 
CPC 

Das Telefonnetz besteht an den Endein¬ 
richtungen (Telefon) aus einer Zwei- 
Draht-Leitung. An dieser liegen bei auf¬ 
gelegtem Telefonhörer 60 Volt Gleich¬ 
spannung an. Wird der Hörer abgenom¬ 
men. bricht diese Spannung auf etwa 10 
bis 20 Volt zusammen. Beide Spannun¬ 
gen würden bei direktem Anschluß an 
den CPC diesen sofort zerstören. Wie ist 
dieses Problem zu lösen? Irgendwo 
muß doch die Telefonleitung an den 
CPC angeschlossen werden. Dazu ist 
eine Trennstufe nötig. Diese besteht bei 
allen CPC-Modellen aus einer seriellen 
Schnittstelle und einem Modem oderei¬ 
nem Akustikkoppler. 

Der Mikroprozessor des CPC (Z 80) 
verarbeitet alle Informationen mit einer 
Breite von acht Bit parallel, das heißt, 
alle acht Informationsbits liegen 
gleichzeitig an. Das geht aber bei einer 
zweiadrigen Telefonleitung nicht. Des¬ 
halb muß die parallele Information zu¬ 
erst in eine serielle umgewandelt wer- 
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Netzspannung 


DFÜ-Arbeitsplatz 


den. Die acht Bit werden nacheinander 
über die beiden Adern übertragen. Hat¬ 
te der Rechner an der Gegenstelle nun 
aber eine andere Taktfrequenz als der 
CPC, würde es Verständigungsproble¬ 
me geben. Deshalb wurde die Übertra¬ 
gungsgeschwindigkeit international 
genormt. 

Einigkeit macht stark 

Gebräuchlich sind folgende Geschwin¬ 
digkeiten. angegeben in Baud (1 Baud 
= 1 BitjcSekunde): 

50, 75, 100, 300, 1200, 2400, 4800, 
9600.19200 und 38400 Baud. 

Die Festlegungen der Übertragungsra¬ 
ten, die Anzahl der zu sendenden Da¬ 
ten- und Stopbits sowie die elektri¬ 
schen Parameter der seriellen Schnitt¬ 
stelle sind in der RS232-Schnittstelle 
verankert. Solche Schnittstellen gibt es 
für den CPC als zusätzliche Baugruppe 
im Handel. Diese werden meist an den 
Expansionsbus des CPC angesteckt. 

Die elektrischen Parameter der RS232 
(auch V 24 genannt) sind: 

Sendepegel: +/-12 Voll 
Empfangspegel: +/-12 Volt 
Der positive Pegel bedeutet logisch 
“H” und der negative Pegel logisch 
“L”. 

Solch eine Schnittstelle hat also immer 
noch drei Leitungen (Senden, Empfan¬ 
gen. Masse) und kann immernoch nicht 
an die zwei Telefonleitungen ange¬ 
schlossen werden. Außerdem kann das 
Telefonnetz keine plus oder minus 12 
Volt übertragen. Es ist also noch ein 
weiteres Bauteil nötig, ein Modem oder 
ein Akustikkoppler. 

Daten im Wandel 

Das Modem oder der Akustikkoppler 
wandeln die RS-232-Daten des Rech¬ 
ners in mindestens zw'ci verschiedene 
Frequenzen (Töne) um und passen die¬ 
se an die elektrischen Parameter des Te¬ 
lefonnetzes an. Modem ist eigentlich 
ein Kunstwort aus MOdulator und DE- 
Modulator. Ein Modem oder Aku¬ 
stikkoppler wandelt die RS-232-Daten 
nicht nur in eine Richtung um. sondern 


dekodiert die im Telefon hörbaren Fre¬ 
quenzen in die RS-232-Daten zurück. 
Ein Modem wird dabei direkt an die 
zw'ei Drähte der Telefonleitung ange¬ 
schlossen. aber der Akustikkoppler le¬ 
diglich an den Telefonhörer ge¬ 
quetscht. Außerdem kann ein Modem 
mittels der Hayesbefehlc (Quasi-Stan¬ 
dard) sogar ganz das Wählen und den 
Verbindungsaufbau übernehmen. Man 
spricht von einem intelligenten Modem 
(smartmodem). Ein “dummes” Modem 
wandelt dagegen nur die Daten in die 
entsprechende Frequenz um und umge¬ 
kehrt. 

Modems kosten derzeit je nach Aus¬ 
stattung zwischen 200 und 3000 DM. 
Wichtig ist die postalische Zulassung 
des Modems oder Akustikkopplers. 
Das treibt den Kaufpreis zwar um etwa 
200 DM höher, allerdings kann ein 
nicht zugelassenes Modem wesentlich 
mehr Kosten verursachen. Vor allem 
bei billigen Modems kann es Vorkom¬ 
men. daß durch Oberwellenbildung 
zum Beispiel der Rechnerfrequenz 
schnell mal 16 kHz auf die Telefonlei- 
tung gelangen. Das treibt den eigenen 


Gebührenzähler mächtig hoch. Sollte 
durch mangelnde Verarbeitung sogar 
die Netzspannung auf die Telefonlei¬ 
tung gelangen, kann es auch verheeren¬ 
de Unfälle geben. 

Nicht an der falschen 
Stelle sparen 

Für alles ist der Betreiber des Modems 
verantwortlich! Sollte das Modem öfter 
Störungen verursachen, muß der Be¬ 
treiber auch die Entstörungskosten 
zahlen. 

Selbstverständlich kann trotz ange¬ 
schlossenem Modem auch normal tele¬ 
foniert werden. Allerdings ist gleich¬ 
zeitiges Sprechen und Datenübertragen 
für den Normalverbraucher noch nicht 
möglich. 

Der Aufbau eines Arbeitsplatzes mit 
CPC, RS 232 und Modem ist im Bild 
schematisch dargestellt. Die Steuerung 
des Modems vom Rechner aus erfolgt 
mit einem Terminalprogramm. Solche 
Programme werden meist von den Her¬ 
stellern der RS 232 angeboten, können 
aber auch aus dem PD-Softwarefundus 
































Einsteiger 



Meist verwendet - 
acht Datenhit und ein 
Stoppbit 


genommen werden. Ein gutes und auch 
hei einigen Händlern noch erhältliches 
PD-Programm ist beispielsweise 
MEX. Bei einigen Rechnern wird aber 
manchmal auch eine solche Software 
mit der Systemsoftware mitgeliefert. 
So beim Joyce. 

Nichts geht ohne 
Software 

Nun zu den Mailboxen. Eine Mailbox 
ist nichts anderes als ein an das Telefon¬ 
netz angeschlossener Rechner (der Typ 
spielt dabei eine untergeordnete Rolle 
CPC, Joyce, AMIGA oder PC). Auf 
dem Rechner läuft ein Mailboxpro¬ 
gramm, welches etwa folgendes kann: 

- ankommende Anrufe entgegenneh¬ 
men 

Bereitstellung einer Benutzerführung 

- Dateien in einem möglichst großen 
Speicherbereich (Festplatte) sammeln 
und diesen in Bereiche, auch Bretter ge¬ 
nannt, einteilen 

-elektronische Briefe sammeln, vertei¬ 
len, bearbeiten, zustellen 

- gegebenenfalls die Übertragungspa¬ 
rameter an den jeweiligen Teilnehmer 
anpassen 

-Datenbanken bearbeiten 

- alle User der Mailbox mit den zu¬ 
gehörigen Paßworten speichern 
Zusammengefaßt muß eine Mailbox in 
einem Programm Textverarbeitung, 
Datenbank, Kommunikation und den 
Übergang zu weiterer Online-Softwäre 
(etwa Spielen) bieten. 

Während die meisten von Hobby-An¬ 
wendern benutzten Mailboxen durch 
Privatleute aus Idealismus ins Leben 
gerufen und betrieben werden, gibt es 
auch öffentliche Dateniibertragungs- 
dienste der Bundespost TELEKOM. 


Das bekannteste ist das Bildschirm¬ 
textsystem (BTX). Hier werden die Da¬ 
ten seitenweise und nicht im ASCII- 
Code übertragen. Sehr viele Themen 
sind nur über eine Telefonnummer er¬ 
reichbar. 

Eine von der Bundespost betriebene 
Mailbox ist die Telcbox. Solche profes¬ 
sionellen Mailboxen habenden Vorteil, 
daß gleichzeitig mehrere Nutzer darin 
arbeiten können. Dies wird durch Ver¬ 
wendung eines Großrechners gewähr¬ 
leistet. Weitere Möglichkeiten bietet 
das Datenübertragungsnetz DATEX-P. 
In diesem Netz werden die Informatio¬ 
nen in Datenpaketen zusammengefaßl 
versandt. Die Gebühren beschränken 
sich auf die Anzahl der Pakete. Viele 
professionelle Mailboxen sind über 
DATEX-P erreichbar. 

Die Daten sind gut 
verpackt 

Noch nicht für den CPC verfügbar ist 
die Möglichkeit, Bilder, Texte, Doku¬ 
mente und anderes zu “faxen”. Im Ge¬ 
gensatz zum TELEX (50 oder 100 
Baud, nur Telegrafenalphabet Ziffern, 
Zeichen und Buchstaben) ist es beim 
Faxen möglich, ganze Seiten Punkt für 
Punkt zu übertragen. Das geschieht mit 
einer Übertragungsgeschwindigkeit 
zwischen 2400 und 9600 Baud. 

In letzter Zeit macht der Begriff ISDN 
die Runde. ISDN ist die Abkürzung für 
“Integrated Services Digital Network” 
(diensteintegrierendes digitales Tele¬ 
kommunikationsnetz). Übereine zwei¬ 
adrige Kupferleitung, wie beim alther¬ 
gebrachten Telefon, stehen jedem An¬ 
wender zwei Nutzkanäle und ein Steu¬ 
erkanal zur Verfügung. Einen solchen 
Anschluß nennt man Basisanschluß. 


Die Informationen werden hier, im Ge¬ 
gensatz zum bis jetzt verwendeten ana¬ 
logen Telefonnetz, digital übertragen. 
Und das mit einer Geschwindigkeit von 
64 kBit pro Sekunde. 

Über diese zwei Kanäle wird es also 
möglich, gleichzeitig zwei Dienste zu 
nutzen. So können Sie sich während ei¬ 
ner laufenden Datenübertragung mit 
Ihrem Gegenpart problemlos unterhal¬ 
ten. 

Wem das noch nicht als ausreichend er¬ 
scheint, kann sich einen Primärmulti- 
plexanschluß installieren lassen, liier 
stehen Ihnen, über zwei Doppeladern 
oder zwei Glasfasern. 30 Nutzkanäle 
und ein Steuerkanal zur Verfügung. 
Während des Telefonierens kommt es 
schon einmal vor, daß es im Hörer 
knackt, rauscht oder Wählgeräusche zu 
hören sind. Das bedeutet aber im allge¬ 
meinen den Tod für die zu übertragen¬ 
den Daten. Das Modem kann sie nicht 
erkennen oder verfälscht sie. Bei nor¬ 
malen ASCII-Texlen ist das nicht so 
schlimm, denn meist ist der Sinn des 
Textes noch erkennbar. Bei einem Pro¬ 
gramm ist alles verloren. 

Deshalb wurden verschiedene Übertra¬ 
gungsprotokolle mit Fehlerkorrektur 
entwickelt. Die PD-Programme können 
mindestens X-Modem. Bei X-Modem 
werden die Daten blockweise zu 256 
oder 1024 Byte übertragen. Für jeden 
Block wird eine Checksumme errechnet 
und mitübertragen. Der empfangende 
Rechner bildet diese ebenso und ver¬ 
gleicht sie mit der empfangenen. Stimmt 
alles überein, gibt es ein kurzes "ok”. Ist 
die Summe falsch, ein “nicht ok”, und 
der sendende Rechner schickt den Block 
noch einmal, bis er richtig empfangen 
wurde. Das passiert alles automatisch, 
ohne Zutun des Nutzers. Dieser braucht 
nur auf dem Bildschirm die Übertragung 
zu beobachten. Wurde ein Block zehn¬ 
mal falsch übertragen, bricht X-Modem 
ab. Nicht mitübertragen werden der 
Filename, Datum, Uhrzeit und weitere 
Informationen. Um das zu verbessern, 
wurde Y-Modem entwickelt. Das meist- 
verbreitetste Übertragungsprotokoll ist 
Z-Modem. Dieses Protokoll ermöglicht 
die automatische, optimale Anpassung 
der Blockgröße (64 bis 2048 Byte je 
Block) an die Güte der Telefonleitung. 
Neuere Protokolle sind Bi Modem-fähig. 
Es kann gleichzeitig ein Programm ge¬ 
sendet und ein Programm empfangen 
werden, was mit den vorherigen Proto¬ 
kollen nicht möglich ist. 

O. Malthaei/jg 
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Tips & Tricks 



Neue Tools für den 
täglichen Gebrauch 


100 DM für 
IkByte 


Tips und Tricks sind es immer wieder, die benötigt 

werden und von denen man nicht genug haben kann. So 
können wir Ihnen auch diesen Monat wieder interessante 
und vor allem kurze Routinen vorstellen, die Sie in Ihre ei¬ 
genen Programme einbauen können. 


Laufschrift 


CPC 464166416128/plus 

Jeder weiß, was es ist, aber nicht unbedingt jeder kann es pro¬ 
grammieren. In unzähligen Demos kann man Sie auch linden, 
und zwar in allen Farben und in den unterschiedlichsten Zei¬ 
chen. Was liegt also näher, als einmal eine solche Routine zu 
veröffentlichen. 

Die Vorteile dieses kleinen Programms liegen eindeutig auf 
der Hand. Hiermit kann eine Laufschrift generiert werden, 
die den ganzen Bildschirm — also 24 Zeilen - in Anspruch 
nimmt. Es ist für Mode 1 konzipiert und wird folgender¬ 
maßen benutzt: In der ersten Zeile muß der als Laufschrift ge¬ 
wünschte Text (maximal 79 Zeichen) stehen. Nun definiert 
man ein Darstellungsfenster mit der Größe 40,40,2,25 und 
poked in die Speicherzelle &A00Edie Länge des Textes, mit 
acht multipliziert. 

In Programmform könnte dies dann ungefähr soaussehen: 

10 LOAD"LAUFS.BIN" 

20 x=0 : INK 0, x: INK 2,x:INK 1,24 
30 a$="CPC Internationa I " 

40 POKE &A00E, (LEN (a$) +1) *8 
50 MODE 2 : PEN 2 : PRINT a$ : PEN 1 
60 WINDOW 40, 40,2,25 
70 CALL ÄAOOC 

Karl-Heinz Wiihr/rs 



Bildschirmverzerrer 

CPC 464/664/6128/plus 

Ebenfalls für eigene Demos oder aber für kleine Showeinla¬ 
gen in eigenen Programmen eignet sich der Bildschirmver¬ 
zerrer. Er verzerrt - wie der Name schon sagt - die momentan 
auf dem Bildschirm befindliche Grafik. Das Besondere hier¬ 
bei ist, daß nicht nur der normale Bildschirm, sondern auch 
der Border, der eigentlich nicht benutzt werden kann, in den 
Verzerrvorgang miteinbezogen wird. 

Klaus Meffert/rs 


Label Basic 


CPC 6128/plus 

Diese kleine BASIC-Erweiterung stellt sechs neue Befehle 
zur Verfügung, die sich alle mit der Verwendung von Labels 
beschäftigen. Aufgrund des geringen Umfangs (rund 340 
Bytes im Speicher) kann Sie ohne Probleme eingebunden 
werden, und es bleibt noch mehr als genug Platz für das eige¬ 
ne Programm. 

|DEFINE,”label” Mit diesem Befehl können Sie einer Pro¬ 
grammstelleein Label zuordnen (auch zwischen zwei Befeh¬ 
len). 

|JUMP,”labeI” Dieser Befehl bewirkt einen Sprung zu dem 
angegebenen Label. 

|CALL,”label” kann mit dem Befehl GOSUB verglichen 
werden. Wurde eine Label mit ICALL angesprungen, kann 
mit dem RETURN-Befehl einfach wieder zurückgesprungen 
werden. 

|DEFLAB,”label”,z Mit diesem Befehl kann einer Zeile (z) 
ein Label zugeordnet werden. In diesem Zusammenhang dür¬ 
fen Sie jedoch nicht mit dem RENUMber-Betehl arbeiten, da 
die Zeilennummer nicht automatisch erhöht oder verringert 
wird. 

IRESTORE/Maber’ Hiermit w ird der DATA-Zeiger auf die 
mit “label” definierte Stelle gesetzt. Dieser Befehl entspricht 
dem BASIC-Kommando RESTORE. 

|CLEAR Alle bisher definierten Labels werden gelöscht. 

Zur Demonstration der einzelnen Befehle finden Sie noch das 
Programm LBDEMO. I KB. Um es zu starten, sollten Sie zu¬ 
erst die BASIC-Erweiterung installieren. 

Beim Umgang mit l.abcl-BASIC sollten Sie folgendes beachten: 



Diese überdimensionale Luit/schult können Sie einfach in eigene Fco- Der Bildschirmverzerrer benutzt neben dem normalen Bildschirm auch 
[•ramme einbinden. den Border gleich mit. 
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Tips & Tricks 


LINGO 


R- 

RATi$- 

Rft» 

RATTE 


3 Versucht e) 
Ready. 


Bei Lingo können Sie Ihren Wortschatz 



etwas authi 




Wissen Sie auf Anhieb, wie viele Dreiecke in dieser Grafik verborgen 
sind? 


•Eine doppelte Definition eines Labels mit gleichem Namen 
deaktiviert die erste nicht automatisch. 

•Bei der Benennung der Labels müssen die Groß- und Klein¬ 
schreibung sowie die Steuer- und Leerzeichen beachtet wer¬ 
den. 

Wolfgang Stengel/rs 

Lingo 

C PC464/664/6 / 28!plus 

Ein kleiner Test: Nennen Sie innerhalb von zehn Sekunden 
mindestens drei Wörter mit dem Anfangsbuchstaben “L", die 
genau sieben Buchstaben lang sind. 

Nicht geschafft? Das macht nichts, denn Sie haben ja Lingo, 
ein Programm, das Ihnen hilft, Ihren Wortschatz spielend zu 
erweitern. 

In diesem Spiel geht es darum, ein Wort, von dem der An¬ 
fangsbuchstabe sowie die Länge vorgegeben sind, so schnell 
wie möglich zu finden. Der Spieler gibt also ein mögliches 
Wort ein. worauf der Computer mit der Auswertung beginnt. 
Alle richtigen Buchstaben, die an der korrekten Stelle stehen, 
werden ausgegeben. Buchstaben, die im Wort Vorkommen, 
jedoch an der falschen Stelle eingegeben wurden, zeigt der 
Computer invers. 

Selbstverständlich soll es dem Spieler nicht so einfach ge¬ 
macht werden. Daher geben invertierte Buchstaben nicht die 
Häufigkeit an, in der ein Buchst 'be im Wort auftritt. Dies be¬ 
deutet. daß bei Eingabe eines Wortes mit zum Beispiel zwei 
“E” beide “E” invertiert ausgegeben werden, auch wenn im 
gesuchten Wort das “E” nur einmal auftaucht 
Die Anzahl der Versuche entspricht der Buchstabenzahl des 
gesuchten Wortes. Im Programm sind bereits 26 Wörter ent¬ 
halten, die per Zufall ausgewählt werden. Weitere Wörter 
können eingegeben werden, wer. t in Zeile 110 die Zahl der 
vorhandenen Wörter geändert und ab Zeile 210 neue Datazei- 
len eröffnet werden. 

Thomas Hombert/rs 

Triangles 

C PC464/664/6128/plus 

Können Sie gut schätzen? Liegt Ihnen das räumliche Den¬ 
ken? Können Sie gut unübersichtliche Flächen beobachten? 


Wenn Sie wenigstens eine der drei Fragen mit einem Ja beant¬ 
worten können, sind Sie genau der (die) richtige für dieses 
Spiel. 

Triangles ist ein recht schweres Spiel, bei dem der Spieler 
schätzen und vor allem genau überlegen muß. Die Aufgabe ist, 
die Zahl der Dreiecke aus einer beliebig großen Fläche zu er¬ 
mitteln, wobei die “Arme” des Dreiecks (=Katheten) die glei¬ 
che Länge haben müssen. Es handelt sich also um gleich¬ 
schenklige Dreiecke. Die Diagonalen dürfen nur von unten 
links nach oben rechts verlaufen. Dies bedeutet wiederum, daß 
in einer Fläche von nur (eins x eins) zwei Dreiecke auftreten. 
Nach dem Programmstart muß der Spieler die Größe der spä¬ 
ter zu erratenden Fläche eingeben (maximal 10). Daraufhin 
w ird das Feld aufgebaut. Nachdem Sic nun Ihren Tip eingege- 
ben haben, berechnet der Computer die wahre Anzahl, gibt al¬ 
le möglichen Längen sow'ie die Differenz zum Tip an. Nun 
wird noch eine Bewertung, die von “genial” bis “extrem 
schlecht” reicht, ausgegeben. 

Die Berechnung der wahren Anzahl der Dreiecke erfolgt 
nach einem recht simplen Verfahren. So passen zum Beispiel 
in eine Fläche der Größe zwei x zwei exakt zehn Dreiecke (8 x 
Länge l,2x Länge2). 

Thomas Hombert/rs 

Convoy Raider 

C PC 4641664/6128/plus 

Haben Sie dieses komplizierte Listing abgedruckt, erwartet 
Sie ein spannendes Spiel, an dem drei Personen teilnehmen 
können. 

Steuern Sie den Flugzeugconvoy durch ein äußerst kompli¬ 
ziertes Höhlensystem. 

Nach dem Programmstart warten Sie, bis das Fragezeichen er¬ 
scheint. Nun geben Sie den Schwierigkeitsgrad ein, der durch 
Werte zwischen 10 (schwer) und 40 (leicht) dargestellt wdrd. 
Nach etwa 20 Sekunden startet nun das Spiel. Die drei Gleiter 
auf dem Bildschirm können wie folgt gesteuert werden: 
Spielerl: Linker Gleiter Joystick UP und DOWN 

Spieler2: Mittlerer Gleiter <Q>und<A> 

Spieler3: Rechter Gleiter CursorUP und DOWN 

Das Spiel kann jederzeit mit <ESC> neu gestartet werden. 
Siegerist derjenige, dessen Gleiter als letzter zerschellt. 

Elmar Krieger/rs 
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100 'LAUFS.1KB [1060] 

110 FOR i=&A000 TO &A07F [652] 

120 READ a$:W=VAL("&H"+a$) [880] 

130 s=S+w:POKE i,w:NEXT [1039] 

140 IF so 14869 THEN PRINT"Fehler in Data [2142] 
s":END 

150 SAVE"laufs.bin",b,&A000,&7F [1727] 

160 DATA EF,03,A0,2A,27,BC,CB,B4 [315] 

170 DATA CB,BC,22,6E,A0,06,0O,ll [1484] 

180 DATA 00,00,05,05,00,19,BD,CD [1463] 

190 DATA 53,A0,26,28,2E,02,CD,75 [719] 

200 DATA BB,Dl,21,8E,01,06,08,05 [1114] 

210 DATA E5,D5,CD,F0,BB,FE,02,28 [1122] 

220 DATA 04,3E,20,18,02,3E,8F,CD [1017] 

230 DATA 5A,BB,CD,5A,BB,CD,5A,BB [1766] 

240 DATA D1,E1,C1,2B,2B,10,E0,C1 [1939] 

250 DATA CD,1B,BB,D8,13,13,10,C2 [625] 

260 DATA C3,0D,AO,3E,09,32,38,00 [1518] 

270 DATA 06,02,C5,06,CO,21,51,CO [1114] 

280 DATA 11,50,C0,C5,E5,D5,01,4F [1557] 

290 DATA 00,ED,BO,Dl,El,CD,00,00 [1035] 

300 DATA E5,Dl,1B,CI,10,ED,CI,10 [1666] 

310 DATA El,3E,03,32,38,00,09,00 [1564] 


100 'VERZERR. 1KB 
110 'Aufruf : CALL &A000 
120 FOR i=&A000 TO &A0B1 
L( "&"+a$ ) :NEXT 
130 DATA CD,19,BD,2A,5E, 
21,60,A0,22,5E,AO, F3,2 1, 
FB, 2A, 5E,AO,01,02,BC,ED, 
B6,C2,34,AO,00,00,00,21, 
00,00,00,00,C3,3C,AO,7 E , 
140 DATA 78,06, 08, 10,FE, 
26,AO,01,02,BC,3E, 2E, ED , 
BB , D2 , 00,AO,C9,60, AO, 2E , 
2F,30,30,30 , 2F,2F, 2F, 2F, 
30,30,30,2F,2F,2F,2E,2E, 
150 DATA 2D,2D,2C,2C,2C, 
2E,2E,2E,2E,2E,2D,2D,2D, 
2B,2B,2C,2A,2A,2A,2B,2B, 
2D,2D,2D,2D,00,50,40,55, 


[467] 

[779] 

: READ a$:POKE l,VA [2527] 


AO ,23, 
90,01, 
49,04, 
60,AO, 
23,ED, 
47,00, 
49,04, 
2E,2E, 
30,30, 
2E,2D, 
2C,2D, 
2C,2C, 
2B,2B, 
54,4F, 


7E, 

2B, 

3E, 

C3, 

79 

00 , 

ED, 

2E, 

30, 

2D 

2D, 

2C, 

2C, 

4E 


B7 ,20,03, 
7C,B5,20, 
E 0,4 F , 9 7 , 
3C,AO,00, 


[9925] 


00,OD,C2, [10364 
79,CD,09, 
2F,2F,2F, 
31,31,31, 


2D,2D,2D, 
2C,2B,2B, 
2C,2C,2C, 


[7809] 


100 ' LBASIC.1KB [1047] 

110 MEMORY &7FFF:n=&8000:FOR p=0 TO 2 : READ [7739] 
a$ : FOR g=l TO LEN(a$)/2:POKE n,VAL("&"+MI 
D$(a$ , (g-1 )*2+1,2)): n=n+l : NEXT:NEXT : CALL & 

8000: MODE 1:PRINT" L-BASIC 1.0": PRINT 

120 DATA 211D80012880CDD1BC215281221680221 [12771] 

480C90000000000000000000000000000000000000 

000003D80C35E80C38180C3F590C30980C31081C33 

78100444546494EC54A554DD043414CCC434C4541D 

24445464C41C2524553544F52C500DD6601DD6E004 

E06002 35E2 356EBED5B1680791213 

130 DATA EDB02A58AEEB73237 2 2 32 21680C9AF322 [ 14289] 
1802A1680ED5B1480CDD580CAC580DD6601DD6E007 
E321880235E2356ED5319802A14803A1880BE221B8 
OCADB802A1B807EC60306004F09ED5B1680CDD580C 
2A780CD00B9 3A2180B7CAD080E13E12C355CB7CBAC 
07DBBC923ED5B19803A1880471ABE 

140 DATA C2B180231310F75E2356ED5358AEC93EF [12754] 

F3221802A58AE222280CD8580CD00B92A2280ED5B5 

8AEC390C7CD00B9DD5601DD5E00212480CD34E82A5 

8AE221980ED5358AEDD23DD23CD5E802A19802258A 

EC93EFF3221802A58AE222280CD85802A58AE2217A 

E2A22802258AEC9 


100 ' LBDEMO . 1KB 
110 MODE 1:|CLEAR 

120 IDEFLAB, "1.er label" , 50:PRINT"Anfang": 
PRINT 

130 a=10:IDEFINE, "2.er label " :a=a-l : IF a>0 
THEN PRINT" A";: JUMP," 2 . er label" ELSE PR 
INT:GOTO 180 
140 ' 

150 PRJ.NT"Dies ist ein Unterprogramm!" 

160 RETURN 
170 ' 

180 FOR X=1 TO 10 

190 I CALL, "1 .er label":NEXT 

200 DATA 1,2,3, 4 

210 I DEFINE , CHR$(1) + "DATA' S"+CHR$(1) : DATA 
4, 3,2,1 


[845] 

[775] 

[4398] 

[7809] 


[117] 

[3436] 
[555] 
[117] 
[803] 

[2011 ] 

[431] 

[2912] 


220 |RESTORE,CHR$(1)+"DATA'S"+CHR$(1) 
230 FOR x=l TO 4 : READ b:PRINT b; : NEXT 


[2601] 

[1912] 


100 ' LINGO. 1KB 

110 MODE l:PRINT"LINGO":RESTORE 200:w=INT( 
RND* 2 6 ) + 1 : FOR a=l TO w:READ a$:NEXT:1=LEN ( 
a$):DIM j(1+1):LOCATE 1,4:PRINT LEFT$(a$,l 
);STRING$(1-1,Bst.:";l;:j(l)= 
1 :y=5 

120 FOR r=l TO 1 

130 LOCATE 1,22:INPUT"Tip: " , p$: p$=UPPER$( 
p$):IF LEN (p$) <>1 THEN 130 
140 LOCATE 1, y: FOR S=1 TO 1:IF MID$(a$,s,l 
)=MID$(p$,s,1) THEN PRINT MID$(a$,s,1 ; : j ( 
s)=l :GOTO 150 ELSE j( s)=0:PRINT"-"; 

150 NEXT:IF p$=a$ THEN PRINT :PRINT:PRINT y 

-4 ;"Versuch ( e)":PRINT:END 

160 FOR g=l TO 1:IF j(g)=l THEN 190 

170 FOR h=l TO 1 :IF ( MIDS(p$,g,1 )=MID$ (a$, 

h , 1 ) AND ](h)ol) THEN j (g ) =2 : LOCATE g,y:P 

RINT CHR$(24) ;MID$(p$,g,l);CHR$(24);:h=l+l 

180 NEXT 

190 NEXT:y=y+ 1 :NEXT:LOCATE 1,15:PRINT a$ : P 
RINT:END 

200 DATA "SCHULE","WASSER","KINDER","RIESE 
","SAUNA","KAMMER","FALLE","RATTE","RAKETE 
" , "LIEDER","TISCH","HAENDE","VORHANG", "TAN 
NENBAUM" , "DRÜCKER","MAGAZIN","DISKETTE","L 
AMPE","BRUNNEN","ADLER","GLOBUS","HAUSTIER 
","PIONIER", "GESCHAEFT", "KOBOLD",QUARTAL" 


[ 920 ] 
[8989] 


[732] 

[6838] 

[9622] 


[4616] 

[1803] 
[6537] 


[ 350 ] 
[3171] 

[15293] 


670] 
11021 ] 


100 'TRIANGLE . 1KB [ 

110 FOR a=l TO 6: READ e$(a ): NEXT:MODE 1: IN [ 
PUT"Groesse x,y (max. 10) :",x,y:IF x<l TH 
EN X=1 ELSE IF x>10 THEN x=10 ELSE IF y<l 
THEN y=l ELSE IF y>10 THEN y=10 

120 MODE 1 : FOR a=l TO x*2 STEP 2 : FOR b=l T [14493] 
O y*2 STEP 2: LOCATE 18+a ,1+b:PRINT CHR$(12 
8 ) +CHR$ ( 214) : LOCATE 18+a , 2 +b: PRINT CHR$(21 
4) +CHR$ (143):NEXT:NEXT: FOR a=l TO x*2 STEP 
2: LOCATE 19+a,l:PRINT RIGHT$(STR$((a+1)/2 
) ,3): NEXT:FOR b=l TO y*2 STEP 2:LOCATE 17, 
b+3 

130 PRINT LEB’T$ ( STR$ ( (b+1 )/2 ) ,3) : NEXT: LOCA [15633] 
TE 1, 24: INPUT"Wieviele Dreiecke "; t : LOCATE 
1,1: FOR a=l TO MIN(x,y) :b=(x- (a-l ))* (y-(a 
-1)) *2: PRINT USING "###";b;:PRINT" x Laeng 
e";a: s=s+b:NEXT:PRINT : PRINT : PRINT"Summe :" 

: PRINT:PRINT s;" Dreiecke" : PRINT:d-ABS (s-t 

140 FOR a=l TO 6 : IF d<s/(8-a) THEN x$=e$(a [2151] 

) :GOTO 160 

150 NEXT :x$="extrem schlecht" [2617] 

160 LOCATE 1,23: PRINT"Ihr Tip lag mit" :PRI [9945] 
NT RIGHT$(STR$(d) , LEN(STR$ (d) )-1) " Dreieck 
en neben der wahren Zahl und": PRINT"war da 
her "x$".":CALL &BB18:CLS 

170 DATA "genial","super","gut","maessig", [6034J 
"schlecht","miserabel" 


1 '<@30?P7 = 3[C=1[T6N240@3H88cJh8cH88a3e8BR [ 16799] 
A4@2_0A@0kK0Q0; ] 5=\<S8l , 'n8a3g?T;=7 [ / 'g8<G = 6 

KdZO : 1A\ ll?\3=7kdjl:o A Rc84[ '43 >e91>eigB4 
5[lfWT-d A 2LfWT=d A 3LfWT2X2[dH480ÜQ04 OHm ' DSC 
R=F8b82[bXO[ b?; W280[akoLldV 13j§AhOLldV 13 
j@QkoLldV 13j 68cMKP3MIP4Ub2CU4@2P 

2 'cMf0gGH2cAjk]bP6hLdY 1P;gGh3cAjkhK049[c [12384] 
=8;cMM@ 3MM04A39 7=m90>l'H4iAYg41dP 13hhLdV 

OdPk * Dl 0 0AnPDo= 8 ;' @n>7=9[ai] lSM^P41bHl' 003 
0Qh00l2eh0?Xln<3n?GWe<kKgc01'o'l?'0101M33B 
4WP'd=51<<00P<0 

3 DEFINT A-Z : A=&176 : B=&9000:FOR C=1 TO 105 [8292] 

:D=4: E=16 : WHILE D<99:POKE B,(( PEEK(A) -48 )* 

D+ ( PEEK (A+1) - 48 ) \ E) MOD 256 : D=D*4 : E==E/4 : A= 

A+1 : B=B+1 :WEND: A=A+l-7*(C MOD 60=0):NEXT:I 
NPUT A 

4 B=&4165 : F=A*3:C=80 : FOR D=1 TO 1000:POKE [5919] 

B,C : POKE B+1 ,F: POKE B+2,200-C-F:B=B+3 : E=RN 

D*A/3 : IF RND>0. 49 THEN E=-E 

5 C=C+E : IF C<2 THEN C=2 ELSE IF C>198-F TH [2792] 
EN C=198-F 

6 NEXT:POKE b, 255: INK 0,0:BORDER 6: CALL &9 [2643] 
000 
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Gamer’s Message 

Das Mittel gegen Spielefrust! 

Was halten Sie von Geheimrezepten? Wie es solche Anleitungen und Hilfen 
nun einmal an sich haben, stellen sie nicht für jeden die optimalste Lösung dar. 
Jeder hat so seine eigenen Probleme. Bei Spielprogrammen liegt die Sache 
meist etwas einfacher, man trifft sich irgendwann bei dem gleichen Problem. 
Hier schlagen sich Ihre Einsendungen in die Bresche. Diesmal haben w ir für 

Sie eine bunte Mischung aus Pokes, Tastenkombinationen, Codeworten, Ein¬ 
stiegstips und einer Komplettlösung zusammengestellt. Wie üblich kommen 
dabei Neuerscheinungen, aber auch Klassiker zum Zuge. 


Myth gehört zweifellos zu den besten 
Action-Spielen mit Adventure-Ele- 
menten der letzten Zeit. Alle, die fest- 
hängen und nicht weiterkommen, fin¬ 
den Hilfe durch unsere Komplettlö¬ 
sung. Wer noch nicht alle Hoffnung 
verloren hat. sollte sie aber besser über¬ 
springen. um sich den Spielspaß nicht 
zu verderben. 



Die hier abgedruckten Hinweise wur¬ 
den uns von M. Lebius zugeschickt. 
Den witzigen Originaltext konnten wir 
aus Plalzgründen leider nicht veröf¬ 
fentlichen. 

Stage I: Road to hell 
An verschiedenen Enden des .Spiels 
gibt es Seelen, die in etwa wie Kristall¬ 
kugeln aussehen. Auf diese müssen Sie 
mehrmals feuern. Haben Sie auf diese 
Weise alle Seelen befreit, erscheint ein 
Symbol, das Sie in den nächsten Level 
transportiert. Dazu müssen Sie aller¬ 
dings zum Beginn des Leveis zurück. 
Die Skelette hinterlassen, wenn Sie sie 
abschießen, Totenschädel. Haben Sie 
zehn von ihnen gesammelt, können Sie 
diese in die Flammen in einer Grotte 
(links unten) werfen. Dem dann auftau¬ 
chenden Vogel müssen Sie so lange 
Saures geben, bis nur noch ein Waffen¬ 
icon von ihm übrig ist. Mit diesem erle¬ 
digen Sie nun den Drachen etwas wei¬ 
ter rechts, wodurch Sie in den Besitz ei¬ 
nes Schlüssels kommen. Mit dessen 
Hilfe öffnen Sie dann die Falltür, die 
Sie vorher schon weiter links bemerkt 
haben. Ein paar Räume dahinter I inden 
Sie dann die letzte Seele. Schnappen 
Sie sich das Schlußsymbol, das jetzt ir¬ 
gendwo aufgetaucht ist, und verlassen 
Sieden Level. 


Stage 2: Creecefour hundred BC 
Durch Einfangen der Tauben können 
Sie Bonusleben erhaschen. Die beiden 
Statuen müssen zerstört werden. So ge¬ 
langen Sie schließlich zu einem weibli¬ 
chen Wesen, das sich als äußert 
tückisch erweist, wenn Sie näher kom¬ 
men. 

Wenn Sie gleich nach links zurückge¬ 
hen und am Bildschirmrand warten, bis 
die Frau verschwunden ist, sind Sie 
aber vor deren Attacken sicher. Nach 
dem Durchschreiten des Tores finden 
Sie Medusa, vor der man sich mit Hilfe 
des Schildes schützen kann. Diese muß 
vernichtet werden, ihren Kopf packen 
Sie anschließend in den Sack und dann 
ab zum Drachen. Der kann dann mit 
Medusas Kopf beseitigt werden. Dann 
steht der dritten Runde nichts mehr im 
Weg. 

Vorsicht bei der 
schönen Jungfrau! 

Stage 3: Scandinaviafive hundred BC 
Manche Wickinger haben Feuerkugeln 
bei sich, die sie nur über ihre Leiche 
hergeben. Haben Sie sich so seine 
Schußwaffe erbeutet, schnappen Sie 
sich die Seele und landen am Festland. 
Wenn Sie weitergehen, gelangen Sie zu 
einer aufgebahrten Frau. Das Feuer er¬ 
lischt, wenn Sie die - inzwischen hof¬ 
fentlich gefundene - Pergamentrolle 
anwählen. Mit den Messern, die man 
durch Beseitigen der Keulenschwinger 
erhält, kann man dem Drachen zuset¬ 
zen. Der so erhaltene Schlüssel öffnet 
die Tür zur Burg. Die Statue, die sich 
dort befindet, können Sie mit den Blit¬ 
zen erledigen, die irgendwo unterwegs 
lagen. Jetzt kann’s im alten Ägypten 
weitergehen. 

Stage 4: Egypt three thousand BC 
Mit dem Revolver schießen Sic sich ei¬ 
nen Eingang zur Pyramide. Unten 


gibt’s eine Möglichkeit, die Leben auf¬ 
zufüllen, aber diese soll hier nicht ver¬ 
raten werden. Der Level ist laby¬ 
rinthähnlich angelegt. Folgende Ge¬ 
genstände müssen gefunden werden: 
spezielle Feuerkugeln für den Pharao 
und ein paar Vasen. Irgendwo werden 
Sie nach langem Herumirren ein Au¬ 
gensymbol finden. Dieses nehmen Sie 
mit und suchen, wo sich auf dem Boden 
ebenfalls ein Auge befindet, und legen 
das aufgesammelte dort ab. Im Raum, 
in dem der Pharao aufgebahrt ist. legen 
Sie die vorher gefundenen Vasen ab. 
Hierauf erwacht der Pharao zum Leben 
und schießt im nächsten Raum. Erle¬ 
digt wird er mit speziellen Feuerku¬ 
geln. Jetzt noch das Schlußsymbol auf¬ 
sammeln und... geschafft! 

Das größte Problem bei Night Shift ist, 
daß man anfangs nicht recht weiß, was 
zu tun ist beziehungsweise was sich 
hinter den Bezeichnungen verbirgt. 
Auch mit den Aufgaben der einzelnen 
Maschinen ist man noch nicht so recht 
vertraut. 

Wissen, was es zu tun 
gibt, ist die halbe Miete 

Deshalb hier eine kurze Auflistung für 
die ersten Levels, die Ihnen das Auffin¬ 
den der einzelnen Elemente erleichtern 
soll: Zu Beginn jeder Schicht muß mit 
dem Fahrrad Strom erzeugt werden. 
Ganz oben gibt es einen roten Bolzen 
(bolt). Wenn sich dieser auf- und abbe¬ 
wegt, muß er mit Hilfe des Schrauben¬ 
schlüssels (Spanner) angezogen wer¬ 
den. Ebenfalls ganz oben, aber links 
vom Bolzen, gibt es einen Stecker 
(plug), der in die Steckdose gesteckt 
werden muß. Das Rohmaterial (resin) 
müßte nun zu kochen beginnen. Nor¬ 
malerweise geht nun alles automatisch. 
Die verbliebene Zeit sollten Sie nutzen, 
um die Laufrichtung der Fließbänder 
(conveyer belts) aufzuschreiben und 
Gegenstände einzusammeln. Wichtig 
ist, daß Köpfe und Körper richtig zu¬ 
sammengesetzt werden. 




Erzeugt die Maschine merkwürdige 
Kombinationen - zum Beispiel Körper 
auf Kopf oder zwei Köpfe übere inander - 
muß man die beiden Fließbänder, an de¬ 
nen die Teile zusammengesetzt wer¬ 
den, ein paarmal verstellen. 
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In der/weilen Schicht können afle Pro¬ 
bleme der ersten Schicht auftauchen. 
Außerdem sollten Sie ein Auge auf den 
Kocher (burner) haben, der das Rohma¬ 
terial erhitzt. Dieser befindet sich ne¬ 
ben dem Stecker, auf den man in der er¬ 
sten Runde achten mußte. Möglicher¬ 
weise müssen Sie den KOCI IRR zuerst 
mit dem Streichholz entzünden (light) 
oder die Flammengröße mit dem Hebel 
regulieren (adjust). Weiterhin müssen 
alle Fließbänder so eingestellt werden, 
wie sie in der ersten Schicht liefen. Da¬ 
zu sind Schalter angebracht. 

In der dritten Schicht kommt noch das 
Öffnen der Tuben (tube) mit der richti¬ 
gen Farbe hinzu, so daß diese in die 
Wanne (vat) darunter fließen kann. Tu¬ 
ben und Wanne befinden sich direkt 
oberhalb der Gegenstände, die wie 
Ofenrohre aussehen, etwas unterhalb 
der Anlage, die das Rohmaterial produ¬ 
ziert. 

In späteren Schichten kommen noch 
die Qualitätskontrolle (Quality Con¬ 
troller) und sonstige Schikanen dazu. 
Das Gerät sieht aus wie ein Monitor und 
befindet sich links oberhalb des Fahrra¬ 
des. Weitere Teile müssen bedient wer¬ 
den, aber inzwischen sollten Sie sich ja 
auskennen und wissen, wozu welches 
Teil der Fabrik da ist. 

Hier noch einige Codes für den Anfang: 
Die Kombination Kirsche, Banane, Ba¬ 
nane und Zitrone bringt einen in die 
zweite Schicht. Banane, Kirsche, 
Grapefruit und Pflaume müssen für den 
dritten Level eingestellt werden, und 
Grapefruit, Zitrone, Grapefruit, Grape¬ 
fruit bedeutet Runde vier. 


Times OT Loie 


Gespräche sind der Schlüssel zum Er¬ 
folg in Times of Lore. Nicht entmuti¬ 
gen lassen und alle Leute ausfragen, 
lautet die Devise. Wenn man irgendwo 
jemanden nicht befragt hat. kann es 
sein, daß einem ein Stichwort fehlt, das 
man benötigt, um weiterzukommen. 
Das beginnt schon im Gasthaus, in dem 
das Spiel startet. Übrigens: An den mei¬ 
sten Gerüchten ist etwas Wahres dran! 

Seien Sie gesprächig! 

Wichtig ist, daraufzu achten, daß man 
nicht aus Versehen den Gesprächspart¬ 
ner schlägt, weil man den Feuerknopf 
einmal zu oft betätigt hat. Darm spricht 


nämlich kein Mensch mehr mit dem 
leidgeplagten Helden. Schon deshalb 
sollten Sie den Spielstand häufig spei¬ 
chern, weil es eben doch manchmal un¬ 
beabsichtigt geschieht. 

Die Karte ist recht nützlich, und Sie 
werden bald feststellen, daß sie-entge¬ 
gen dem ersten Eindruck - recht genau 
ist. Außerdem kommen nicht mehr und 
nicht weniger Orte im Spiel vor. als auf 
der Karte eingezeichnet sind, und alle 
haben eine Bedeutung. 

Ilerurnlicgendc Tränke und Zauberrol¬ 
len sind nützlich, aber nicht unbedingt 
erforderlich. 

Ein gutes Gedächtnis oder eine Karte 
sind die Voraussetzungen dafür, daß der 
Prince of Persia nicht immer in diesel¬ 
ben Fallen rennt. 


Ptince OT Per sie 


Den ersten Level kann man aber noch 
auf eine andere Art und Weise meistern: 
Wenn Sie im zweiten Raum sind und 
nach rechts gehen, werden Sic von ei¬ 
nem Wächter angegriffen. Um diesen 
besiegen zu können, brauchen Sie ein 
Schwert. Doch es ist gar nicht nöt ig. ge¬ 
gen ihn zu kämpfen. 

Ein Kampf ist nicht nötig 

Ein weiter Sprung über ihn - und Sie 
können nach rechts weitergehen. Nun 
sind Sie schon im letzten Raum des er¬ 
sten Levels angelangt, ln der zweiten 
Runde haben Sie dann automatisch ein 
Schwert. Der Trick mit dem Übersprin¬ 
gen funktioniert auch dort noch manch¬ 
mal, ist aber schwieriger. 

Wenn man in einen Kampf verwickelt 
ist, darf man eine schlimme Todsünde 
nicht begehen: Das Schwert aus Verse¬ 


hen wegstecken, indem man den Joy¬ 
stick nach unten drückt. Tun Sie dies 
dennoch, bleibt die Spielfigur meist 
flach auf dem Boden liegen, weil der 
Gegner mit einem gezielten Schlag un¬ 
seren Helden endgültig ausgeschaltet 
hat. 

Achtung: 

Joystick nach unten - 
Schwert weg 

Und nun am Schluß unserer Gamer’s 
Message noch einige Kurztips: 

The Vindicator. Alle, denen der erste 
Teil dieses Spiels nicht gefällt, können 
ihn einfach überspringen. "Oppenhei¬ 
mer” lautet der Code für den zweiten. 
“Enolabay” der für den dritten Level. 
Savage. Mit “Sabatta” und "Fergus” 
kommt man in den zweiten beziehungs¬ 
weise dritten Level. 

Freddy Hardest. Der Code “897653” 
verschafft einem den Zugang zum 
zweiten Teil. 

Nebulus. Wenn man während des Spie- 
lens gleichzeitig die Tasten <CTRL>. 
<SHIFT>, <D>, <M>, <P> und die 
Nummer des Levels, in dem man wei- 
termachen möchte, drückt und sich da¬ 
bei nicht die Finger abbricht, kann man 
sich einige Arbeit ersparen. 
Turbo-Boat-Simulator. Die Pauseta- 
ste drücken. Nun kommt man durch 
Drücken von <CLR> in den nächsten 
Level. 

Asphalt. Bei Problemen mit diesem 
Spiel schafft folgende Routine Abhilfe: 

IC OPENOUT"d" 

20 LOAD"asphat.prg" 

30 POKE &79QQ, 0 
40 POKE &6FB2, 0 
50 POKE &7E47, 0 
60 CALL 42240 

Andreas Lober/jg 


Schwierigkeiten? 

An dieser Stelle wollen wir uns in Zukunft, im Rahmen der leicht geänderten 
“Gamer’s Message”, Ihren Problemen mit beliebten Spielen widmen. Schrei¬ 
ben Sie uns doch einmal, bei welchem Spiel Sie an welcher Stelle nicht mehr 
weiterkommen. Wir bemühen uns, Ihnen zu helfen. Ihre Tips und Tricks zu 
Spielen sind uns ebenfalls immer willkommen. 


Die Adresse: 

DMV-Verlag 
Red. CPC International 
Kennwort: Gamers Message 
Postfach 250 
3440 Eschw'ege 
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Tips & Tricks 



Die Trickkiste 


Gesammelte Werke 

Wer kennt sie nicht, unsere Rubrik “100 DM für ein Kilo- 
Byte”? Leider läßt sich nicht immer alles in genau einem 
kByte unterbringen, und so mancher gute Tip bleibt so in 
der Schublade verborgen. Die “Trickkiste” will nun regel¬ 
mäßig diejenigen kurzen Programme unserer Leser vor¬ 
stellen, die etwas länger als ein Kilobyte und trotzdem 
pfiffige Problemlösungen sind. Machen w ir also die Kiste 
auf, und sehen wir, w as diesen Monat so alles an Interes¬ 
santem zum Vorschein kommt. 


Pi - Die Ludolfsche Zahl 


CPC 464 (plus)I664!6128(plus)/PCW(nur DATABOX) 

Uni die Fläche eines Kreises berechnen zu können, benötigt 
man gar nicht so viele Angaben. Lediglich den Radius und 
dann noch den Wert Pi. Gewöhnlich rechnet man dann mit 
dem Wert 3.14 oder 22/7, was jedoch noch äußerst ungenau 
ist. Schon kleine Taschenrechner haben den Wert Pi fest im 
System integriert. Der CPC zum Beispiel kennt die Zahl Pi auf 
ganze 14 Stellen genau. Bisher ist die Zahl auf über 20 Mil ho¬ 


nen Dezimalstellen bekannt, und es ist immer noch kein Ende 
abzusehen. Soviel wollen wir uns jedoch nicht antun. 

Das Programm errechnet die Ludolfsche Zahl nach der 
Ganss-Relation auf 130 Siel len genau aus: 


Pi 


—=12a.rctg — 
18 


1 


8drccg |-bazcig 


1 

239 


FüC'ARCTCT nutzt man nun folgende Formel: 


arctg(x)-x ——... 

Dieser Algorithmus gehört zu den schnellsten, aber trotzdem, 
etwas Wartezeit ist dennoch nicht zu vermeiden. Für die Be¬ 
rechnung von Pi auf 150 Stellen werden ganze 225 Sekunden 
benötigt. Petr Potuznik/rs 


100 ' ************************* 

[894] 

110 ' * PI.BAS * 

[427] 

120 ' * (c) Petr Potuznik * 

[1235] 

130 ' * & CPC International * 

[966] 

140 / ************************* 

[894] 

150 ' 

[H7] 

160 GOTO 450 

[442] 

170 ' 

[117] 

180 ' UNTERPROGRAMME 

[916] 

190 ' 

[117] 

200 ' ra * ARCTG (1/n) 

[911] 

210 GOSUB 240:GOSUB 270:a=-l:b=3:GOSUB 340 

[3390] 

:RETURN 


220 ' 

[117] 

230 ' Erste Position 

[1109] 

240 z=m:FOR j=l TO jmax:p(j)=INT(e*z/n):r( 

[4566] 

j)=p(j):z=e*z-p(j)*n:NEXT:RETURN 


250 ' 

[117] 

260 ' Summierung 

[1349] 

270 s=0 

[ 285] 

280 FOR j=jmax TO 1 STEP -1:i(j)=i(j)+s+p( 

[3597] 

j) :s =0 


290 IF i{j)>=e THEN l(3)=i( J) -e:s= 1 

[1655] 

300 IF i(j)< 0 THEN i(j)=i(j)+e:s=-l 

[1637] 

310 NEXT:i(1)=i(1)+s*e:RETURN 

[2219] 

320 ' 

[117] 

330 ' Naechste Position 

[963] 

340 FOR k=l TO 2:z=0:FOR j=l TO jmax:d=r(j 

[4478] 

)+e*z:r(j)=INT(d/n):z=d-r(j)*n:NEXT j,k 


350 FOR j = l TO jmax:p(j)=a*r(j):NEXT:z=0 

[2846] 

360 FOR j=l TO jmax:d=p(j)+e*z:p(j)=INT(d/ 

[5004] 

b):z=d-p(j)*b:NEXT 


370 GOSUB 270:t=0 

[1013] 

380 FOR j=l TO jmax:t=t+p(j):NEXT 

[2187] 

390 IF t<>0 THEN a = -a : b=b+2:GOSUB 340 

[1374] 

400 RETURN 

[555] 

410 ' 

[117] 

420 ' HAUPTPROGRAMM 

[1580] 

430 ' 

[117] 

440 ' Bildschirmaufbau 

[1166] 

450 MODE 1:PEN 3:BORDER 0:INK 0,0:INK 1,26 

[13242] 

:INK 2,11:INK 3,0:PRINT "PI - Die Ludolfsc 


he Zahi";:FOR x=0 TO 399 STEP 2:FOR y=383 


TO 399 STEP 2:IF TEST(x,y)<>0 THEN PLOT X+ 


120,3*(y-286),2:DRAWR 0,2 


460 NEXT y,X:INK 3,18:PRINT CHR$(30);"- 

[6449] 

PERSEUS Software -":LOCA 


TE 16,9:PRINT CHR$(164);" MCMXCI" 


470 PEN 2:LOCATE 1,13:PRINT "Bitte, eine W 

[7134] 

eile (3 min 45 sec) warten.":PEN 1 


480 ' 

[117] 

490 ' Definitionen und Konstanten 

[1166] 

500 ' 

[117] 

510 ' Groesse der Variablen 

[1572] 

520 e=1000000 

[777] 

530 ' 

[117] 

540 ' Anzahl Variablen 

[1247] 

550 jmax-25 

[655] 

560 ' 

[117] 

570 ' Dimensionierung 

[1908] 

580 DIM i(jmax),p(jmax),r(jmax) 

[2703] 

590 ' 

[117] 

600 ' Alfa (n) und m aus Datas lesen 

[1726] 

610 FOR U=1 TO 3:READ m,n:GOSUB 210:NEXT 

[2750] 

620 ' 

[117] 

630 ' Integer PI 

[569] 

640 i(0)=INT(i(1)/e):i(1)=i(1)-e*i(0) 

[1650] 

650 ' 

[117] 

660 ' Print PI 

[230] 

670 LOCATE 1,13:PRINT "PI =" ;STR$ (i(0)); " , 

[2310] 

680 FOR j=l TO jmax:IF i(j)<e/10 THEN PRIN 

[6521] 

T STRS(O);RIGHT$(STR$(i(j)),LOG10(e)-1); " 


"; ELSE PRINT i(j); 


690 NEXT:PEN 2:LOCATE 1,23 

[1104] 

700 END 

[HO] 

710 ' 

[117] 

720 ' Alfa (n) & Parameter m 

[762] 

730 DATA 48,18,32,57,-20,239 

[994] 


Alles schwarz auf weiß 

CPC 464 (plus)/664/6128 (plus) 

Bei diesem kleinen Utility handelt es sich um eine Routine, 
welche die Bildschirmausgaben des CPC nicht nur auf jenem 
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Tips & Tricks 


beläßt. Nein, per RSX läßt sich Ihr Computer jetzt dazu über¬ 
reden. alles, was auf dem Bildschirm passiert, genauestens 
auf dem Drucker mitzuprotokollieren. Doch zuvor müssen 
Sie das Assemblern st ing eintippen und mit dem CPC- 
Assembler aus dem Heft 8/9’91 in ein Binärfile umwandeln. 
Als nächstes schreiben Sie sich ein kleines BASIC-Pro- 
gra m m m i t folgendem I nh a 1 1 : 

10 LOAD"PROTOKOL.BIN",&AFOO 
20 CALL &AF00 

30 PRINT"Erweiterung installiert" 

40 NEW 

Mit IPRTON schalten Sie nun das Protokoll ein und mit IPRT- 
OFF wieder aus. 

Christian Schuld/rs 


100 

f • ********** * **************** * 


110 

'; ******* PROTOKOLL 

vl ******* 


120 

'; ********* (c) 1991 


********* 


130 

'; ***** Christian Schuld ***** 


140 

'; *** & CPC International **** 


150 

/• **************************** 


160 

/ . 




170 

'org &af00 




180 

'start ld hl,kernel 


neue RSX Befehle 


190 

'ld bc,rsxdat 

; 

einbinden 


200 

'call &bcdl 

; 

KL LOG EXT 


210 

'ld a,&c9 




220 

'ld (start),a 




230 

'ld hl,&bdd9 


Vektoren Adresse 


240 

'ld de,space 0 

/ 

(TXT OUT ACTION) 

retten 

250 

'copy3 ld bc,3 




260 

' ldir 




270 

'ret 




280 

'kernel ds 4 

; 

RSX Daten 


290 

'rsxdat dw beftab 




300 

'jp prtoff 




310 

'jp prton 




320 

'beftab dmx "PRTOFF" 




330 

'dmx "PRTON" 




340 

'db o 




350 

'spaceO ds 3 




360 

'flag db 0 




370 

f • 




380 

'prtoff ld hl,spaceO 


Alte Vektor Adresse 

390 

'ld de,&bdd9 




400 

'j r copy3 




410 





420 

'prton ld a,&c3 

; 

TXT OUT ACTION 


430 

'ld hl,druck 

; 

verbiegen 


440 

'ld (&bdd9),a 




450 

'ld (&bdda),hl 




460 

'ret 




470 

'druck push af 




480 

'call spaceO 

; 

Zeichen auf Bild- 


490 

'pop af 

/ 

schirm ausgeben 


500 

'cp 13 


LR oder CR ? 


510 

'jr z,crout 

/ 

Ja, dann ausgeben 


520 

'cp 10 

; 

und Druckerposition 

530 

'jr z,prn 

; 

nicht erhoehen 


540 

'ld b,a 




550 

'ld a,(flag) 




560 

'inc a 




570 

'ld (flag),a 




580 

'cp 79 


Druckerposition > 

80? 

590 

'push bc 




600 

'call nc,lfcr 

; 

Ja, dann CR & LF 

ausg. 

610 

'pop af 



620 

'prn call &bd 2 b 

r 

MC SEND PRINTER 


630 

'jr nc,prn 




640 

'ret 




650 

'lfcr ld a,i 0 

/ 

LF & CR ausgeben 


660 

'call prn 




670 

'crout ld a,13 




680 

'call prn 




690 

'xor a 




700 

'ld (flaq),a 

; 

Druckerposition = 

0 

710 

'ret 




720 

/ . 

/ 





OCP-Screen-Dekompressor 

CPC 464 (plus)/664l6128 (plus) 

Bekannterweise kann man mit dem Advanced OCP Art Stu¬ 
dio die Bildschirme auch in komprimierter Form abspei¬ 
chern. Leider hat man dann jedoch nicht mehr die Möglich¬ 
keit. diese Screens direkt unter BASICeinzulesen. AMSDOS 
weigert sich beharrlich mit diesen Bildschirmen etwas anzu¬ 
fangen. Man hat also nur die Möglichkeit, entweder die 
Screens ganz normal als 17 kByte große Speicherplatzfresser 
abzuspeichern oder aber mit unserem OCP-Screen-Dekom¬ 
pressor zu arbeiten. 

Tippen Sie zuerst den Datalader (DECOMP.LDR) ab. und 
starten Sie diesen. Es wird nun eine Datei mit dem Namen 
DECOMP.OCP erstellt, die dann von dem Hauptprogramm 
(DECOMP.BAS) nachgeladen werden kann. Das Hauptpro¬ 
gramm starten Sie nun. und der Computer zeigt daraufhin die 
Aufrufadresse an. Nun laden Sie einen komprimierten Screen 
mittels LOAD”screen’\&4000 an die Adresse &4000 im 
Speicher. Mit “CALL Adresse”oder mit <CONTROL> wird 
nun der Screen dekomprimiert und auf dem Bildschirm dar¬ 
gestellt. 

Mike Behrendt/rs 


100 'DECOMP.BAS 
ho '************************ 

120 '* OCP-PIC EXPAND * 

130 '* (c) 1991 M. Behrendt * 

140 '* & CPC International * 

150 '************************ 

160 loc=HIMEM-200:IF loc<32968 THEN PRINT" 

Zu wenig Speicher END 

170 MEMORY loc-1 :LOAD"decomp.ocp", loc 

180 DATA a,l,b,9,c,17,c,40,a,54,a,58,a,62, 

0,65,0,69,1), 72,b,76,<3,79,0,94,6,100,0,122, 

c, 130, c,135,0,139,c,142,0,147, 0,151, 0,154, 

c,158,c,162,a, 165,a, 170, b, 174, b, 178 

190 FOR j=l TO 28:READ a$,r 

200 IF a$="a" THEN v=loc+190 

210 IF a$="b" THEN V=loc+192 

220 IF a$="c" THEN v=loc+194 

230 IF a$="d" THEN v=loc+193 

240 IF a$="e" THEN v=loc+196 

250 GOSUB 340 

260 POKE loc+r,VAL(lo$ ) 

270 POKE loc+r+1 , VAL(hi$) 

280 NEXT 

290 MEMORY &3FFF 
300 MODE 1 

310 PRINT"Zum Entpacken das Bild an die Ad 
resse &4000 laden und dann CALL loc: KEY 
138, "CALL "+STR$( loc ) +CHR$(13) 

320 expand=loc 

330 PRINT:PRINT:STOP 

340 V$=HEX$( v) 

350 IF LEN(V$ ) =3 THEN v$="0"+V$ 

360 hi$="&"+MID$(v$,l,2) 

370 lo$="&"+MID$(v$, 3,2) 

380 RETURN 


[ 1220 ] 

[768] 

[526] 

[780] 

[966] 

[768] 

[4495] 

[2272] 

[8306] 


[992 ] 

[1142] 

[1784] 

[1762] 

[1096] 

[951] 

[976] 

[481] 

[ 686 ] 

[350] 

[758] 

[506] 

[7572] 


[697] 

[1302] 

[851] 

[1570] 

[936] 

[ 1002 ] 

[555] 


100 'DECOMP.LDR [1526] 

HO '*** DECOMPRESS FOR *** [1205] 

120 '* ADV. OCP ART STUDIO * [681] 

130 '* (C) 1991 * [514] 

140 '* Mike Behrendt * [317] 

150 '* & CPC International * [966] 

160 '************************ [768] 

170 FOR j=41000 TO 41186 [836] 

180 READ a$ : POKE j,VAL("&"+a$) [1306] 

190 a=a+VAL("&"+a$) [1263] 

200 NEXT [350] 


210 IF A=17679 THEN SAVE"DECOMP.OCP",B,410 [5321 ] 
00,187 ELSE MODE 1 : PRINT"Fehler in Datas": 

STOP 
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220 PRINT"Datei fehlerfrei gespeichert" [3621] 
230 END [HO] 

240 DATA 21,B8,Al,36,O,23,36,C0,21,BA,Al,3 [2556] 
6,0,23,36,40 

250 DATA 21,BC,Al,36,0,23,36,40,23,36,0,23 [2231] 
,36,0,23,36 

260 DATA 0,23,36,0,23,36,0,2A,BC,Al, 56, 3E, [2714] 
4D,BA,28,2D 

270 DATA 3E, 1 ,BA,28,51,2A,B8,A1,72,2A,B8,A [1665] 
1,23,22,B8, Al 

280 DATA 2A, BC,Al, 23,22 , BC,Al,2A,BA, Al, 2B, [3173] 
22,BÄ, Al, 21,BB 

290 DATA A1,3E,0,BE,28,2,18,CF,2B,BE,C8,18 [2013] 

,CA,21,BC,Al 

300 DATA 4E,23,46,21,CO, Al, 71,23,70,3, A,57 [2709] 
,3E,4A,BA,20 

310 DATA C4,3,A,57,3E,48,BA,20,BC,2A,BC, Al [3294] 
,23,23,23,23 

320 DATA 23,22,BC,Al,18,C8,2A,BC,Al,23, 22, [2326] 
BC,A1,2A,BC, Al 

330 DATA 7E,57,2A,BC,A1,23,22,BC,Al, 2Ä, BC, [3427] 
Al,46,2A,BC,A1 

340 DATA 23,22,BC,Al,2Ä,B8,A1,70,23,22,B8, [2026] 
Al, 15, 2A,BA,Al 

350 DATA 2B, 2 2,BA,A1,3E,0,BÄ,20,EB,18,93 [2708] 


Copyshop mit 24 Nadeln 

C PC 464 (plus)/664/6I28(plus) 

Wer einen 24-Nadel-Drucker sein eigen nennen kann, wird 
sicher schon festgestellt haben, daß viele Programme die 
Qualitäten dieses Druckers nicht richtig ausnutxen. Beson¬ 
ders schade ist dies, wenn man ein Grafikprogramm hat. des¬ 
sen Ausdrucke auf dem 24-Nadler auch nicht besser aussehen 
als auf einem normalen 9-Nadel-Drucker. Dem können wir 
jetzt jedoch abhel fen. 

Tippen Sie zuerst das Programm COPYSH24.BAL ab und 
speichern es auf Ihrer Copyshop-Arbeitsdiskelte. Nun kön¬ 
nen Sie es starten, und die Datei COPYS1 IOP.B1N wird auto¬ 
matisch modifiziert. Laden Sie nun COPYS1 IOP.BAS ein. 
und ändern Sie folgende Zeilen: 

100 MEMORY &53FF 

120 LOAD"CO? YSH24.BIN": CALL &A3D3 
220 reloc=&9F0C:invers=... 

1840 . . . :SAVE ""+na$,b, &5C00,&238 
1920 SAVE"COPYSH24":SAVE"COPYSH24. BIN" , 
b, &9F00,6.7F8 

Vordem ersten Versuch sollte nun das geänderte Programm 
unter dem Namen COPYSH24. BAS auf Ihre Arbeitsdiskette 
geschrieben werden. Nun können Sie den Unterschied zwi¬ 
schen dem normalen Ausdruck und dem 24-Nadel-Druck be¬ 
staunen. Und das alles durch rund 120 Bytes, um die das Pro¬ 
gramm länger geworden ist. Klaus Weisbrich/rs 


90 anfg=&AlFB:ende=anfg+2 :GOSUB 150 [1556] 

100 anfg=&A6C0:ende=&A6F7 :GOSUB 150 [1672] 

110 POKE &A4CE, &5C [428] 

120 SAVE"copysh24.bin",b,&9F00,&7F8,&9F00 [2195] 

130 PRINT"... und jetzt bitte noch die Aen [7444] 
derungen in COPYSHOP.BAS vornehmen !!"CHR$ 

(7) 

140 END [HO] 

150 GOSUB 180 : FOR i=arifg TO enderIF (i-anf [5111] 
g) MOD 16 = 0 AND ioanfg THEN GOSUB 170 
160 READ byte$:byte=VAL( "&"+byte$) :summe=s [5330] 
umme+byte:POKE i,byte:NEXT 

170 READ sum$ :IF VAL("&"+sum$ )<>summe THEN [9396] 
PRINT"Irgendetwas stimmt in Zeile"zeile"m 
it den Daten nicht !!"CHR${7):STOP 
180 summe=0:zeile=zeileH0:RETURN [1837 ] 

190 ' Verschieberoutirie [1477] 

200 DATA D5 , CD,CI,A4,ED,4B,7C,A6,21,8E,A1, [2363] 
09, 2 2 , E0,A6,21,0883 

210 DATA C0,A6,22,C3,A4,ED,53,CD, A4,21, 11, [3561] 
00,22,DO,A4,01,0769 

220 DATA 07,00,11, D4,A4, 21,35, 9F, ED,B0, Dl, [2787] 
21,00,02,19,22,0551 

230 DATA 86,5D,C3,C2,A4,A6,20,15,00,00,00, [2796] 
00,03E7 

240 ' Aufruf der 24-Nadel-Routine [1988] 

250 DATA CD,C0,A6,CI , Dl , C9,048E [899] 

260 ' zweite Steuersequenz [2343] 

270 DATA 1B,2A,21, 0066 [546] 

280 ' 24-Nadel-Routine [1573] 

290 DATA DD,CB,13,OE,E5,FD,E5,06,03,21,EB, [4266] 
A6,FD,21 , F5,A6,0904 

300 DATA CB,03,AF,FD, 4E,00,23, CB,03,30,01, [2131] 
B6,0D,20,F7,CD,0691 

310 DATA 8E,Al,CB,OB,FD,23, 10,EA, FD,El,El, [3422] 
C9,1C,03,80,70,08B6 

320 DATA 0E,01,C0, 38,07, 02,04,03,0117 [1366] 


Mitmachen! 

Wenn Ihnen die “Trickkiste” gefällt, dann helfen Sie mit, sie 
zu füllen! Kurze Programme in BASIC. C, Pascal oder As¬ 
sembler, SUBMIT-Dateien für CP/M. Kniffe und Kunstgriffe 
zu dBase II, Multiplan oder Wordstar - all das paßt in diese 
Kiste. Als Dokumentation brauchen Siekeinen ausformulier¬ 
ten Artikel beizulegen, sondern bloß eine knappe Beschrei¬ 
bung. worum es geht. Das Ganze möglichst auf Diskette 
(5,25 Zoll oder 3 Zoll) und abgeschickt an: 

D MV-Verlag 

Redaktion CPC International 

Trickkiste 

FuldaerStr.6 

3440 Esch wege 

Natürlich gibt es für jeden veröffentlichten Tip ein Autoren¬ 
honorar. 

Ihre Trickkistler 


^ o ' ************************************* 
************************************* 

20 ' Programm COPYSH24 . BAL 

30 ' BASIC-Lader fuer Erweiterung von C 

OPYSHOP um 24-Nadel-Treiber 

40 ' S 1991 K-W-Soft & CPC Internationa 

50 ' ************************************* 

************************************* 

60 SYMBOL AFTER 256:MEMORY &9EFF : LOAD"copy 
shop.bin" ,&9F40 

70 anfg=&9F00 : ende=&9F3B:zeile=190:GOSUB 1 
50 

80 anfg=&Al85:ende=anfg+5:GOSUB 150 


[2597] 

[1392] 

[3391] 

[2309] 

[2597] 

[4549 ] 

[2643 ] 

[2788] 
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Im Vorübergehen 

BASIC-Zeilen im laufenden 
Programm einfügen 

Ein Programm, das sich selbst verändert-eine tolle 
Sache. Oft ist es sogar dringend notwendig, zumindest 
einzelne Zeilen “automatisch” in ein laufendes Pro¬ 
gramm hineinzwängen zu lassen. Das Utility im Sonder¬ 
heft 7 ‘88/89 zeigte den Weg, aber nur für den CPC 464. 

Schreibt man zum Beispiel einen Funktionsplotter, wäre es 
recht schön, die Funktionen direkt an das Programm zu über¬ 
geben. Bisher wurde dies immer so gelöst, daß für die Einga¬ 
be der Funktion das Programm unterbrochen wurde und mit¬ 
tels EDIT die Zeile, die eine Funktion aufnehmen sollte, edi¬ 
tiert wurde. Nach dem Abschluß konnte nun mit einer vorher 
umdefinierten Taste wieder in das Programm zurückgesprun¬ 
gen werden. Recht kompliziert, oder? 

Warum also nicht einfach auf Bewährtes zurückgreifen. Im 
Sonderheft 7'88/89 wurde zum Beispiel eine Routine veröf¬ 
fentlicht. die es zumindest auf dem 464 möglich machten, 
über den RSX-Befehl /GEN, eine Zeile vom laufenden Pro¬ 


gramm aus zu verändern. Einzige Voraussetzung hierbei ist 
jedoch, daß diese Zeile-in welcher Form auch immer—schon 
existent ist. 

In unserem Fall könnte die vorhandene Zeile zum Beispiel so 
aussehen: 

50 REM. Hier sol 1 die Zeile hin 

und die Eingabe der Funktion zum Beispiel so: 

10 PRINT"3itte geben Sie die Funktion ein: Y="; 

20 INPUT"",funktS 

Nun haben wir die Funktion schon einmal in einem String ab¬ 
gespeichert. Damit GEN mit der Funktion etwas an/.ufangen 
weiß,ergänzen wirden String um zwei Informationen: 

30 funkz$="50 y="+funkt$ 

Da der String jetzt vollständig ist, können wir ihn an das Pro¬ 
gramm übergeben. 

40 GEN,@funkt$ 

Starten Sie nun das Programm, und geben Sie eine beliebige 
Funktion ein. 

Mit LIST können Sie sich das Ergebnis ansehen. 

Tippen Sie zuerst das Programm GEN.BAS ab und speichern 
es unter diesem Namen. Nun müssen Sie - je nach vorhande¬ 
nem Computer - entweder GEN464.BLD, GEN664.BLD, 
oder GEN6128.BLD abtippen und starten. Ist alles richtig, 
wird nach dem Start von GEN.BAS das entsprechende Ma¬ 
schinenprogramm nachgeladen und der RSX installiert. 

Jan Eric Duden/rs 


10 'GEN.BAS [1307] 

20 'Installiert die RSX-Routine GEN [2807] 

30 '(c) 1991 Jan Eric Duden & CPC Internat [1644] 
ional 

40 SYMBOL AFTER 256:MEMORY &9FFF:SYMBOL AF [3853] 
TER 240 

50 IF PEEK(SBD71)=&E8 THEN typ$="464" [1896] 

60 IF PEEK(&BD71) =&55 THEN t.yp$="664" [1980] 

70 IF PEEK(&BD71)=&14 THEN typ$="6128" [2265] 

80 MODE 1 : CALL &BC02 'SCR RESET [1363] 

90 PRINT "Sie haben einen CPC";typ$; ". " [2553] 

100 JF typ$<>"464" THEN LOAD"GEN"+typ$+".B [3725] 
IN",&A000 : CALL &A000 

110 IF typ$="464" THEN LOAD"GEN"+typ$+ ".BI [2465] 
N",&AF00:CALL &AF00 

120 PRINT "Befehl : "CHR$(34);:PEN 3:PRINT » [8955] 
|GEN,<STRING> ";:PEN 1:PRINT CHR$(34);" k 
ann benutzt werden .": PRINT:NEW 


10 'GEN464 . BLD [954] 

20 'Generiert den RSX-Loader fuer CPC 664 [2546] 

30 '( c) 1991 Juergen Schob & CPC Internati [1708] 
onal 

40 MEMORY &9FFF [134] 

50 FOR adr=&AF00 TO &AF45:READ a$:POKE adr [3805] 
,VAL( "&"+a$): s=s+VAL( "S"+aS): NEXT 
60 IF SO&2010 THEN PRINT CHR$ ( 7 ) " DATAFEHL [2379] 
ER I! !": END 

70 PRINT "OKAY !!!": SAVE"GEN464.BIN", B,&AF [3670] 
00, &45 : END 

80 DATA 3E,C9,32,00,AF, 01, 0E,AF [2048] 

90 DATA 21,17,AF,C3,D1,BC,13,AF [1372] 

100 DATA C3, 1B,AF,47,45 , CE, 00,00 [1630] 

110 DATA 00, 00, 00,FE, 01, C0,DD,66 [937] 

120 DATA 01, DD, 6E, 00,06, 00,4E,23 [1410] 

130 DATA E5, DD,El,DD ,66,01,DD, 6E [1441] 

140 DATA 00,11, A4, AC, ED, B0, AF,12 [1654] 

150 DATA CD,00,B9 , F5,21,A4 ,AC ,CD [1436] 

160 DATA BC,E6,F1,C3,0C,B9 [845] 


10 'GEN664.BLD [647] 

20 'Generiert den RSX-Loader fuer CPC 664 [2546] 

30 '(c) 1991 Jan Eric Duden & CPC Internat [1644] 
ional 


40 MEMORY &9FFF [134] 

50 FOR adr=&A000 TO &A065:READ a$:POKE adr [4632] 
,VAL("&"+a$):s=s+VAL("&"+a$):NEXT 
60 IF SO&2E68 THEN PRINT CHR$ ( 7 ) "DATAFEHL [3209] 
ER ! ! !": END 

70 PRINT "OKAY l !!" : SAVE"GEN664. BIN", B ,&A0 [4029] 
00 , &65: END 

80 DATA 3fi, C9 ,32,00, A0 , 01 , 0E, A0 [2192] 

90 DATA 21,17,A0,C3,D1, BC, .13 , A0 [ 1299 ] 

100 DATA C3,1B,A0,47,45,CE,00,00 [1804] 

110 DATA 00, 00, 00,FE,01,C0,EB,06 [925] 

120 DATA 00, 4E, 0C,23,E5 , DD,El,DD [1796] 

130 DATA 66, 01, DD, 6E,00, 11,66, A0 [1907] 

140 DATA ED,B0,EB, 36,20,23, 36, 00 [2162] 

150 DATA CD,00,B9,F5,21,66,A0,CD [2112] 

160 DATA 54,A0, Fl, CD, OC, B9 ,21,66 [2180] 

170 DATA A0, 23, 54,5D,01,FF, 00, 36 [1081] 

180 DATA 00,ED, B0, C9 , CD, 5 2,DE,B7 [863] 

190 DATA C8,CD,D4,EE,D0,7E,FE, 14 [1429] 

200 DATA 20,01,23,C3,AA, E7 [330] 


10 'GEN6128.BLD [973] 

20 'Generiert den RSX-Loader fuer CPC 6128 [2533] 
30 '(c) 1991 Jan Eric Duden & CPC Internat [16441 
ional 

40 MEMORY &9FFF [134] 

50 FOR adr-SrA000 TO &A065:READ a$:POKE adr [4632] 
, VAL( "S."+a$ ) :S=SH-VAL( "&"+a$) :NEXT 
60 IF SO&2E59 THEN PRINT CHR$ (7 )"DATAFEHL [ 3321 1 
ER 1!!": END 

70 PRINT "OKAY !!! ":SAVE"GEN6128.BIN",B,&A [3853] 
000,&65:END 

80 DATA 3E,C9,32,00,A0,01,OE,A0 [2192] 

90 DATA 21,17,A0,C3, Dl,BC,13,A0 [1299] 

100 DATA C3,1B,A0,47,45,CE,00,00 [1804] 

110 DATA 00,00,00,FE,01,C0,EB,06 [925] 

120 DATA 00,4E,0C,23,E5,DD,El,DD [1796] 

130 DATA 66,01,DD,6E,00,11,66,A0 [1907] 

140 DATA ED,B0,EB,36,20,23,36,00 [2162] 

150 DATA CD,00,B9,F5,21,66,AO,CD [2112] 

160 DATA 54,A0,Fl,CD,OC,B9,21,66 [2180] 

170 DATA A0,23,54,5D,01,FF,00,36 [1081] 

180 DATA 00,ED,B0,C9,CD,4D,DE,B7 [680] 

190 DATA C8 , CD,CF,EE,DO,7E,FE,14 [ 18221 

200 DATA 20,01,23,C3,A5,E7 [681]' 
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Die verkehrte Maus 

Trackball und Easiart im Test 

Arbeitet man mit einem Grafikprogramm, so erscheint einem die zeitaufwen¬ 
dige Bedienung per Tastatur als reichlich unpraktisch. Etwas anderes muß 
her, wie war’s mit einem Trackball. Wir haben den ”MEDLTracker Ball” von 
Marconi genauer unter die Lupe genommen. 


Im Stanford Research Institute in Kali¬ 
fornien wurde in den sechziger Jahren 
an der Entwicklung von Systemen zur 
Büroautomatisierung gearbeitet. Ein 
Ergebnis war die heutzutage aus der 
Computertechnik nicht mehr wegzu¬ 
denkende Maus. Allerdings konnte 
sich diese anfangs noch nicht so richtig 
durchsetzen. 

Erst als etwa Mitte der achtziger Jahre 
Computer mit grafischen Benutzer¬ 
oberflächen aufkamen, schaffte die 
Maus den entscheidenden Durchbruch. 
Bei Grafikprogrammen ist sie unver¬ 
zichtbar. Eine neuere Variante des “Na¬ 
getiers” ist der Trackball. Er ist im Prin¬ 
zip eine auf dem Rücken liegende 
Maus. Zur besseren Bedienbarkeit mit 
der Hand ist die Kugel aber um ein Viel¬ 
faches größer. Man bewegt nicht mehr 
das ganze Gerät und damit die gesamte 
Mechanik und Elektronik, sondern nur 
noch die oben herausragende Kugel. 
165 Gramm verleihen dem Bull das 
nötige Gewicht, um ein problemloses 
Arbeiten zu gewährleisten. 

Das Arbeitsprinzip des Trackballs ist 


wie das der Maus. Die Kugel treibt zwei 
Achsen an, eine für die horizontale und 
eine für die vertikale Bewegungsrich¬ 
tung. Am Ende jeder Achse befindet 
sich eine Lochrasterscheibe, die einen 
Lichtstrahl unterbricht. Anhand der 
Häufigkeit der Unterbrechungen der 
Lichtstrahlen ermittelt die Elektronik 


und -geschwindigkeit. Aus diesen Wer¬ 
ten werden anschließend die Signale 
für die Joysticksteuerung des CPC ge¬ 
bildet. Die Trackball-Elektronik gau¬ 
kelt dem CPC sozusagen einen Joystick 
vor. 

CPC getäuscht 

Der ”MEDL Trucker Ball” ist in einem 
etwa 20 Zentimeter langen und etwa 12 
Zentimeter breiten Gehäuse unterge¬ 
bracht. Die unter der Kugel befindliche 
Handauflage ermöglicht ein bequemes 
und präzises Arbeiten. Über der Kugel, 
ebenfalls bequem zu erreichen, befin¬ 
den sich drei Tasten. Möchte man das 
von der Maus her bekannte “Ziehen” 


bewerkstelligen, so ist aber etwas Fin¬ 
gertraining nötig, falls man den Track¬ 
ball nur mit einer Hand bedienen möch¬ 
te. 

Die Installation des ”MEDL Trucker 
Ball” an den CPC gestaltet sich recht 
einfach. Das Verbindungskabel wird 
mit dem Joystickport des CPC verbun¬ 
den. Zur Stromversorgung wird zwi¬ 
schen 5-Volt-Stecker und CPC ein Ad¬ 
apter gesteckt, von dem eine Leitung 
zum Joystick-Stecker des Trackballs 
geht. 

Ist das erledigt, verhält sich der CPC, 
als ob ein Joystick angeschlossen wäre. 
Über BASIC kann der Trackball mit 
dem üblichen JOY-Befehl abgefragt 
werden. Auch einige Spiele können, 
nach kurzer Umgewöhnung, mit dem 
Trackball bewältigt werden. So ließ 
si ch d as un 1 ängst v orgestel I te ” B u ilder- 
land” fast so gut wie mit dem Joystick 
spielen. 

Im mitgelieferten Programmpaket sind 
auch eine Anzahl RSX-Erweiterungen 
enthalten, die Sie in Ihren eigenen Pro¬ 
grammen verwenden können. Somit 
wird es für Sie möglich, Ihre eigenen 
Entwicklungen auf die Gegebenheiten 
des Trackballs abzustimmen. Leider ist 
die Dokumentation für diese BASIC- 
Erweiterungen nur als englischer Text 
auf der Diskette. 

Besonders eignet sich der Trackball zur 
Bedienung eines Grafikprogramms. So 
ist das mitgelieferte Programm Easiart 
speziell darauf abgestimmt. 

Das Programm selbst besteht aus vier 
Teilen, dem Mustereditor, dem Icon- 
Editor. dem Druckertreibergenerator 
und dem Hauptprogramm. Vom Haupt¬ 
programm aus können alle Teilpro¬ 
gramme - außer dem Druckerlreiber¬ 
generator - gestartet werden. Die Be¬ 


fragt. 

Alle Programmteile und Funktionen 
werden über Icons angewählt. Folgen¬ 
de Funktionen stehen dem Hauptpro¬ 
gramm zur Verfügung: 

- Ausschneiden und Einfügen 

- Füllen mit definierbaren Mustern 

- Löschen ausgewählter Farben 

- vollständiges Löschen 

- Ausschnittvergrößerung 

- Texteingabe mit verschiedenen 
Effekten 

- Freihandzeichnen 

- Zeichnen von Kreisen 
-Zeichnen von Rechtecken 


des Trackballs die Bewegungsrichtung dienung erfolgt größtenteils über den 

Trackball. Nur eventuell einzugeben¬ 
der Text wird über die Tastatur abge- 
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- Zeichnen von Dreiecken 

- Zeichnen von Linien mit variablen 
Breiten 

- verschiedene Sprays 

- Einstellung der Farben 

- Festlegung von Grafikfenstern 

- einstellbares Schnappraster zur 
leichteren Positionierung 

- Einfügen von Icons. 

Die zur Verfügung stehende Zeichen¬ 
fläche beträgt 271 mal 171 Bildpunkte. 
Leider ist der Koordinatenursprung 
nicht, wie man eigentlich annehmen 
würde, im Nullpunkt, sondern an der 
Position 4/11. Benutzt man die Koordi¬ 
naten nur zur Feststellung von Diffe¬ 
renzen, so fällt dies nicht weiter ins Ge¬ 
wicht. 


Ruft man die Speicherfunktion des 
Easiarl-Programms auf, so wird die 
Grafik als kompletter 17-KByte- 
Screen abgelegt. Darin enthalten ist lei¬ 
der aber auch die Bedieneroberfläche 
des Easiart-Programms. Dieser Nach¬ 
teil erschwert die Einbindung einer 
Grafik in ein anderes Programm. 
Druckt man dagegen die Grafik mit der 
im Programm enthaltenen Druckrouti¬ 
ne, so erhält man ein Bild ohne die 
störenden Umrandungen der Bediener¬ 
oberfläche. Mit einem außerhalb des 
Easiart-Programms zu startenden 
Druckertreibergenerators läßt sich der 
Druckertreiber bequem an die ver¬ 
schiedensten Steuercodes anpassen. 

Die Möglichkeit, vordefinierte Bildtci- 


le. die Icons, in Grafiken einzubinden, 
ist besonders positiv. Im Lieferumfang 
des Programms ist ein kompletter Satz 
von 22 Icons enthalten. Mit Hilfe des 
Icon-Editors erhält der Anwender die 
Möglichkeit, die 16 mal 16 Punkte 
großen Grafiken zu ändern oder auch 
eigene neu zu erstellen. Alle Funktio¬ 
nen werden auch in diesem Unterpro¬ 
gramm anhand von Icons angewählt. 
Folgende Funktionen stellt der Icon- 
Editor zu Verfügung: 

Laden und Speichern von Icon- 
Dateien 

- Löschen einzelner Vorlagen 

- Drehen um je 90" 

- Inverse Darstellung 

- Spiegeln an der x-Achse 

- Spiegeln an der y-Achse. 

Mit Vorsicht ist der Diskettenmenü¬ 
punkt zu gebrauchen. Gibt man hier ei¬ 
nen Dateinamen an, der nicht auf der 
Diskette vorhanden ist, so hatte das bei 
unserem Testmuster einen Programm¬ 
absturz zur Folge. 

Der Mustereditor ist ähnlich wie der 
Icon-Editor aufgebaut. Hier hat man 
ebenfalls wieder die Funktionen Dre¬ 
hen, Spiegeln, Löschen und Invertieren 
zur Verfügung. In einem Testfenster 
kann man sich jederzeit das Ergebnis 
seiner Arbeit ansehen. 

JörgGurowski 


Den MEDL TRACKER BALL stellte 
uns zum Test zur Verfügung: 
Weeske-Computer-EIektronik 
Potsdamer Ring 10, W-7150Backnang 
Preis: 178 DM 



Ein Blick in das Innenleben des "MEDL Travker Balls " 
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Der Langeweile keine 
Chance! 


Programme unter der Lupe 

Wieder haben wir einen Blick auf den Programmarkt für den CPC geworfen. 
Wir haben einige Spiele und ein Anwendungsprogramm herausgepickt und 
für Sie getestet. 


Die Einführung zu Oceans neuem Carl- 
ridge-Spiel PLOTTING sagt überden 
Hintergrund des Spieles rein gar nichts 
aus. Außer, daß es so einfach sei wiedas 
Grillen von Eiswürfeln - soso! Der 
Spielablauf wird aber zum Glück aus¬ 
führlich. auch mit Skizzen, erläutert. 
Das ist bitter nötig, denn anfangs klingt 
alles etwas wirr. 

Auf dem Bildschirm befinden sich 
zahlreiche Steine mit Symbolen. Am 
linken Rand kann man ein kleines, 
eiförmiges Etwas mit zwei Augen auf- 
und abbewegen. Es hat einen Stein zur 
Rechten, den es bei Drücken des Feuer¬ 
knopfes nach rechts schleudert. Trifft 
dieser Stein auf einen anderen mit dem¬ 
selben Symbol, verschwindet der ge¬ 
troffene .Stein. Der Stein hinter dem ge¬ 
troffenen nimmt anschließend den 
Platz rechts neben dem Ei ein. und des¬ 
sen Stelle wiederum wird durch den ge¬ 
schleuderten besetzt. 

Trifft eines der Symbole die Wand, 
wird es rechtwinklig abgelenkt und 


fliegt nach unten weiter. So sind die 
aufgereihten Blöcke auch von oben her 
zugänglich. Hat man die Anzahl der 
Steine auf dem Bildschirm genügend 
reduziert, gelangt man in die nächste 
Runde. 

Eine Geschichte von Ei¬ 
ern und bunten Symbolen 

Pro Runde haben Sie nureine begrenzte 
Zeitspanne zur Verfügung, die aber 
sehr großzügig bemessen ist. So steht 
also nicht die Reaktionsschnelle, son¬ 
dern die Knobelei im Vordergrund. Die 
eigentliche Schwierigkeit ist nämlich, 
daß ein Zeichen der Art. die Sie gerade 
zum Werfen haben, manchmal gar nicht 
von links oder von oben her zugänglich 
ist. Dann verlieren Sie ein Leben. 

In den höheren Levels erhöht sich die 
Anzahl der Steine auf dem Bildschirm. 
Gleichzeitig reduziert sieh die Menge 
der Steine, die übrigbleiben dürfen. 
Außerdem tauchen Hindernisse auf. 


die manche Reihen von einer Seite her 
blockieren. Auch die Anordnung der 
Symbole wird für den Spieler immer 
schwieriger. 

Nach einigen Spielen hat man heraus¬ 
gefunden, worauf man achten muß. 
Wer nicht einige Züge vorausdenkt, hat 
keine Chance, weil er an ein totes Ende 
gelangt, ln dieser Beziehung hat 
PLOTTING eine gewisse Ähnlichkeit 
mit dem Brettspiel Solitaire. 

Arbeit für die grauen 
Zellen 

PLOTTING ist die Umsetzung eines 
recht ungewöhnlichen Spielautomaten. 
Ungewöhnlich gilt hier sowohl für das 
Spielprinzip als solches als auch für den 
Zwei-Spieler-Modus. Dieser erlaubt 
zwei Spielern, gleichzeitig zu spielen. 
Allerdings geschieht das völlig unab¬ 
hängig voneinander auf einem zweige¬ 
teilten Bildschirm. Was Spieler 1 macht, 
hat keinerlei Einfluß auf Spieler 2. 

Die verbesserten Grafikfähigkeiten, 
die bei Cartridge-Software zur Verfü¬ 
gung stehen, wurden gut ausgenutzt. 
Die Grafik ist sogar besser als bei der 
Atari-ST-Version. Zu jedem Level wird 
ein anderer, sehr detaillierter Hinter¬ 
grund verwendet, der für das eigentli¬ 
che Spiel keine Bedeutung hat. 
Soundeffekte gibt es nur wenige, aber 
gut passende. Während des Spieles hört 
man ständig eine Melodie, die sich lei¬ 
derziemlich schnell wiederholt. 
PLOTTING ist rundum gelungen. 
Zwar bietet es nicht überwältigend viel 
Abwechslung. Aber weil man weiß, 
daß die Grenze immer nur die eigene 
Fähigkeit vorauszudenken ist, stellt es 
doch eine enorme Herausforderung 
dar. 


PLOTTING 

Hersteller: Ocean 
Steuerung: Joypatl oder Joystick 
Voraussetzung: GX4000.464 Plus oder 6128 Plus 
Preis: 94,50 DM 

Zur Verfügung gestellt von: EDV-Obemieier 
Bemerkung: nur auf'Cartridge erhältlich 

Bewertung: 

Grafik: 2 Sound: 3 

Präsentation: 3 Motivation: 2 

Endnntc: 2 


Da in den bisherigen Reviews die An¬ 
wendungsprogramme etwas vernach¬ 
lässigt wurden, hier nun das 3D CON- 
STRUCTION KIT. Vor Jahren kün¬ 
digte die Firma Incentive ein System 
namens “Freescape” an. Mit diesem 
sollte es möglich sein.dreidimensiona- 


30 CPC 2/3'92 






































Software-Review 


le Spiele mil ausgefüllter Vektorgrafik 
zu erstellen. Der Spieler sollte sich in 
einer künstlichen Welt frei bewegen 
können. Niemand glaubte aber so rich¬ 
tig daran. Als dann das erste Spiel die¬ 
ser Art, DR ILLER, erschien, rieben 
sich die Leute die Augen und glaubten, 
nicht richtig zu sehen. 

Man konnte tatsächlich um alles her¬ 
umlaufen - sogar fliegen und die 
ganze Well wurde in bester Manier aus 
der Perspektive des Spielers darge¬ 
stellt. Und auch das Spielgeschehen 
nutzte die Möglichkeiten der neuen 
Räumlichkeit voll. Es war mit keinem 
anderen Spiel zu vergleichen. DRIL- 
LER ist heute ein Klassiker. DARK 
SIDE, TOTAL ECLIPSE, TOTAL EC- 
LIPSE II. CASTLE MASTER und 
THECRYPTfolgten, waren ähnlich er¬ 
folgreich und boten spielerisch immer 
wieder etwas Neues, ohne jedoch die 
Verwandtschaft mit DR1LLER leugnen 
zu können. Bei allen konnte man durch 
eine Welt wandern und alles von jeder 
nur vorstellbaren Perspektive betrach¬ 
ten sowie die herumstehenden Objekte 
manipulieren. 

Wenn Sie nun auf den Geschmack ge¬ 
kommen sind, hier eine gute Nachricht 
für Sie: Jetzt gibt es das 3D CON- 
STRUCTION KIT. Mit diesem Paket 
ist es möglich, nach kurzer Einarbei¬ 
tungszeit selbst Spiele zu erstellen, die 
in der Räumlichkeit den professionel¬ 
len Spielen in nichts nachstehen. 

Bauen Sie eine eigene 
Welt 

Das Programm wird bei Geräten mit 
128 kßyte Speicher auf einmal gela¬ 
den, bei 64-k Byte-Maschinen ist es 
zweiteilig. 


Der erste Teil ermöglicht es, in den ein¬ 
zelnen Gebieten dreidimensionale Gra¬ 
fiken und Landschaften zu zeichnen. 
Dazu stehen einige Grundformen zur 
Verfügung, die beliebig plaziert wer¬ 
den können. Mit anderen Funktionen 
kann jederzeit alles, was sich auf dem 
Bildschirm befindet, vergrößert, ver¬ 
kleinert, verschoben, gedreht und ver¬ 
zerrt werden. Komplizierte Formen 
werden einfach aus den Grundformen 
zusammengesetzt. 

Durch geschickte Schattierungen ist es 
möglich, im Mode I bis zu 16 Farben 
gleichzeitig auf dem Bildschirm darzu¬ 
stellen. Wem die vordefinierten Farben 
der Gegenstände nicht gefallen, kann 
sie problemlos ändern. 

Die so erzeugten Kreationen können 
aus allen Winkeln angeschaut werden, 
für die exakte Positionierung werden 
selbstverständlich auch die Koordina¬ 
ten angegeben. 

Ein Blick von allen Seiten 

Zwei Kritikpunkte seien hier nicht ver¬ 
schwiegen, auch wenn sie den guten 
Gesamteindruck nicht trüben können: 
Die Plazierung der Gegenstände ist 
zunächst etwas ungenau, sie müssen 
meist noch herumgerückt werden. 
Schöner wäre es auch, wenn man den 
Gegenständen Namen geben könnte. 
Wenn man sich keine Liste geschrieben 
hat, weiß man vielleicht nicht mehr, ob 
“Quadril 4" nun die Wand oder der Ein¬ 
gang des Hauses war. In diesem Fall 
muß man den Gegenstand erst verschie¬ 
ben, um zu sehen, welcher betroffen ist. 
Der gesamte Grafikeditor wird über 
Icons bedient. Die wichtigsten Funk¬ 
tionen sind aber auch über Tasten ab- 
rufbar. 


Der zweite Teil des Programms ist eine 
einfache Programmiersprache. Sie ist 
speziell auf die Bedürfnisse des Pro¬ 
gramms zugeschnitten und schnell zu 
erlernen. 

Folgendes Programm läßt zum Beispiel 
Gegenstand eins verschwinden, wenn 
Gegenstand zwei beschossen wird: 

IFSHOT2 
THEN 
INVIS 1 
END2F 

Genauso einfach kann man Kollisionen 
abfragen oder den Spieler in ein neues 
Gebiet setzen. Die meisten Aufgaben 
können so mit wenigen Programmzei¬ 
len realisiert werden. Dabei wurde vor 
allem an Spiele wie die bisherigen 
Freescape -Produkte gedacht. Bei die¬ 
sen stand das Erforschen einer Well im 
Vordergrund. 

Oft mußte man Schätze finden und sich 
Wege bahnen, indem man die richtigen 
Schalter betätigte. Doch die Program¬ 
miersprache des 3D CONSTRUC- 
TION KIT erlaubt auch andere Aufga¬ 
benstellungen. teilweise allerdings mit 
einem etwas höheren Programmierauf¬ 
wand verbunden. 

Angenehm ist, daß das Programm auto¬ 
matisch die wichtigsten Grundfunktio¬ 
nen, wie das Hochsteigen auf einer 
Treppe oder das Hinabfallen, be¬ 
herrscht. Diese Funktionen können 
natürlich auch nach Belieben manipu¬ 
liert werden. Sogar die Art und Position 
der Anzeigen können Sie verschieben 
und neue Armaturen mit jedem beliebi¬ 
gen Malprogramm zeichnen. Per Ta¬ 
stendruck testen Sie das bisher Ge¬ 
schaffene und kehren dann problemlos 
wieder in den Editor zurück. 
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Alle Möglichkeiten aufzuführen, würde 
den Rahmen dieses Beitrages spren¬ 
gen. 

Online-Test möglich 

Nicht umsonst umfaßt das Handbuch - 
leider nur in Englisch vorliegend - 
50 Seiten. Trotzdem beherrscht man die 
wichtigsten Grundfunktionen schon 
nach etwa einer halben Stunde. Um den 
Einstieg weiter zu erleichtern, liegt 
eine Videokassette mit einer Ein¬ 
führung bei. 

Auf der Diskette befindet sich neben 
den Editoren auch ein Demospiel. Wer 
es gelöst hat, kann sich anschauen, wie 
es programmiert wurde. 

Die mit dem Programm erzeugten Spie¬ 
le können so gespeichert werden, daß 
sie auch ohne das 3D CONSTRUC- 
TION KIT lauffähig sind. Wenn Sie an¬ 
geben. daß Ihre Spiele mit dem 3D 
CO N ST R U CT IO N KIT erstellt wur¬ 
den, dürfen Sie damit machen, was Sie 
wollen-also auch verkaufen! 

Durch seine Flexibilität eignet sich das 
Programm sowohl als Hilfsmittel zum 
Entwerfen von Spielen als auch als et¬ 
was ungewöhnliches Malprogramm. 
Als kleinen Service und damit Sie sich 
besser vorstellen können, wie die ferti¬ 
gen Endprodukte aussehen, haben w ir 
für Sie ein kleines Spielchen entwor¬ 
fen. Vom ersten Stein bis zum fertigen 
Programm sind etwa sechs Stunden 
vergangen. Sie finden es aul der DAl A- 
BOX; es erklärt sich von selbst. Wir 
wünschen Ihnen viel Spaß damit! 


3D CONSTRUCTION KIT 

Hersteller: Incentive/Domark 
Preis: 99,90 DM 
Bezugsquelle: VIB-Versand 


Die Steine des Verlieses sind kalt. An 
den Wänden 11 ackert der Schein der 
Fackeln. Der Schatten eines Mannes 
wird an die Mauern geworfen. Eines 
Mannes, der dort unten sitzt, obwohl er 
der PRINCE OF PERSIA sein könnte. 
Als der Sultan abwesend war, riß der 
Großwesir die Macht an sich, um das 
Land mit tyrannischer Hand zu regie¬ 
ren. Die Tochter des Sultans hat die 
Wahl, den Großwesir zu heiraten oder 
zu sterben. Für die Entscheidung gibt er 
ihr eine Stunde Zeit... 

Gerade genug für den Spieler, sich aus 
dem Kerker zu befreien, eine Reihe von 
toten Wachleuten hinter sich zu lassen 
und zur Prinzessin zu stürmen! 

Aus dunklen Verliesen 
zur Prinzessin 

Doch die unterirdischen Gänge sind 
voller Gefahren. Brüchige Böden, Fall¬ 
türen und Wächter sind nur einige da¬ 
von. Mindestens ein Schwert ist nötig, 
um eine Chance zu haben. Zum Glück 
ist unser Prinz gut durchtrainiert. Er 
rennt und springt geschmeidig w ie kein 
zweiter durch das Verlies, sucht sich 
die richtigen Wege, um nicht in Sack¬ 
gassen zu landen oder in Gruben zu fal¬ 
len. 

Ist man so aus einem Level entkom¬ 
men, wird man zunächst mit einer Si¬ 
cherheitsabfrage konfrontiert. Nur 
wenn man das gesuchte Wort aus dem 
aufwendig gestalteten Handbuch, das 
übrigens ausschließlich in Englisch 
beiliegt, eingetippt hat, geht's im näch¬ 
sten Level weiter. Ärgerlich wird es, 
wenn man sich vertippt, denn dann wird 
das Spiel gnadenlos abgebrochen. 

In der Anleitung steht, die Melodie ori¬ 
entiere sich immer am Spielgeschehen. 
Eine nette Idee - wenn die Musik nicht 



SHADOW OF THE 
HEAST - zeigen Sie 
den Monstern, werdet' 
Stärkere ist! 


so schrecklich klingen würde. Glückli¬ 
cherweise sind während des Spiels die 
meiste Zeit nur Effekte zu hören. 


Die Animation ist eine 
Klasse für sich 

Einige grafische Elemente sind etwas 
stümperhaft ausgeführt. Doch das 
Flackern der Flammen läßt hoffen. Und 
siehe da: Unser Prinz ist ganz vorzüg¬ 
lich animiert: laufen, springen, vor¬ 
sichtig vorwärts gehen, mit dem 
Schwert kämpfen, sich an Wänden 
rauf- und runterhangeln. Wenn er fällt 
oder springt, geht er anschließend bei 
der Landung in die Knie. - Bei keinem 
anderen Spiel habe ich bisher so viele 
Aktionen gesehen, die so fließend aus¬ 
geführt wurden. 

Action, Adventure und Kampfsport 
vereinen sich mit einer dichten Atmo¬ 
sphäre zu einem außergewöhnlichen 
Spiel: PRINCEOFPERSIA. 


PRINCE OF PERSIA 

Hersteller: Brodcrburul/Domark 
Steuerung: Joystick oderTastulur 
Vorausset/.u ng: füral le CPCs 
Preis: 64,50 DM 

Zur Verfügunggeslelll von: EDV Oberineier 
Bemerkung: lildinacli 

Bewertung: 

Grafik:! Sound: 4 

Präsentation: 1 Motivation: I 

Endnote: I 


Gleich vier erfolgreiche Spiele zum 
Film sind in der HOLLYWOOD 
COLLECTION enthalten. Alle vier 
sind noch relativ neu und waren bisher 
nur als Vollprcisspiele im Handel. Die 
Anleitungen liegen nur in englischer 
Sprache bei. 

BATMAN wmrde im letzten Heft in der 
Cartridge-Version getestet. Die Disket- 
ten-Version ist absolut identisch. Das 
Herumschwingen von Plattform zu 
Plattform, die Fahrt durch die Stadt, die 
Mission im Flugzeug und der Knobel¬ 
teil machen so viel Spaß wie eh und je. 
Hinzu kommt, daß Grafik und Sound 
überdurchschnittlich sind. 

Zweiter im Bunde ist ROBOCOP. 
Dieser Polizist, der zur I lälfte Mensch, 
zur anderen Hälfte Maschine ist, soll 
Ruhe und Ordnung wiederherstellen. 
Ebenso wie BATMAN ist auch ROBO¬ 
COP in Abschnitte gegliedert, die zum 
Teil einen kühlen Kopf, meist aber vor 
allem eine gute Reaktion erfordern. 
ROBOCOP kann mit verschiedenen 
Waffensystemen schießen und sich 
ducken, aber nicht springen. 


32 CPC 2/3’92 













I 


Software-Review 



n 

> 

sn 


n 


nt 

I) 

er 

er 

ie 

er 

er 

;t- 

as 

zu 

lie 

;l- 

l e - 

nd 

P. 

:li, 

Dil 

:n. 

ü- 

im 

or 

m. 

en 

ch 


Teilweise muß er durch ein System von 
Leitern und Gängen den richtigen Weg 
finden. 

Sprachausgabe. flotte Musik und farbi¬ 
ge Grafik haben das Spiel, als es zum 
ersten Mal erschien, zu einem riesigen 
Erfolg werden lassen. Und dies nicht 
ganz zu unrecht. INDIANA JONES 
AND THE LAST CRUSADE ist 
ebenfalls in Levels aufgeteilt, die Sze¬ 
nen aus dem Film entsprechen sollen. 
Indiana Jones kämpft gegen die Nazis 
und sucht den heiligen Gral, der Un¬ 
sterblichkeit verleiht. Die Grafik ist 
einfarbig, die Titelmelodic gut. 

Die einzelnen Teile sind vom Spielprin¬ 
zip her ähnlich. Indiana Jones läuft, 
springt und klettert durch eine Well 
voller Gefahren, gegen die er sich nur 
teilweise mit seinem Lasso wehren 
kann. Der Weg zum Ziel ist nicht ein¬ 
fach, aber voller Überraschungen. 
Viertes und letztes Spiel ist GHOST- 
BUSTERS II. Nach längerer Pause, 
während der sich die Truppe vor allem 
auf Parties vergnügte, haben die Gei¬ 
sterjäger jetzt wieder alle Hände voll zu 
tun. Dazu brauchen sie sogar die Hilfe 
der Freiheitsstatue. 

Drei Teile, alle relativ originell, mit 
guter Grafik und der Filmmusik sorgen 
für Kurzweil. 

Sammelpackung 
ohne Schwachpunkte 

Bei den meisten Compilationen sind ei¬ 
nige schwache Spiele enthalten. Nicht 
so bei der IIOLLYWOOD COLLEC¬ 
TION - hier sind alle Programme ihr 
Geld wert. Wer noch nicht mehr als 
zwei der Spiele hat, kann unbesorgt zu¬ 
greifen. 


HOLLYWOOD COLLEC¬ 
TION 

Hersteller: Occan 

Steuerung: alle Spiele Joystick odcrTastalur 
Voraussetzung: fiirallcCPCs 

Preis: I4X, DM 

Zur Verfügung gestellt von: EDV-Obermeier 

BATMAN 

Bewertung: 

Grafik: 3 

Präsentation: 2 

Endnote:2 

Sound: 2 

Motivalion:2 

ROBOCOP 

Bewertung: 

Grafik: 1 

Präsentation: 1 

Hndnote: 1 

Sound: 2 

Motivation:2 

INDIANA JONES 

Bewertung: 

Grafik: 1 

Präsentation: 2 

Endnote: 2 

Sound: 2 

Motivation:! 

GHOSTBUSTERS II 

Bewertung: 

Grafik: 2 

Präsentation: 2 

Sound: 1 

Motivation:2 


Lange, unterirdische Gänge voller 
Kreaturen, wie sie noch kein Mensch 
gesehen hat, durchstreifen Sie bei 
SHADOWOFTHE BEAST. 

Vor Ihnen taucht ein bedrohliches We¬ 
sen auf. Ein gezielter Schlag - und 
wenn Sie Glück haben, ist die Gefahr 
gebannt. 

Finstere Gänge und 
fiese Monster 

Doch da vorn endet der Weg. Also um¬ 
drehen und die Leiter, an der Sie vorher 
vorbei kamen, herunterklettern und 
über die Löcher im Boden hinweg¬ 
springen. 


Schußwaffen, Schlüssel und Zauber- 
tränke sind nötig, wenn Sie Ihre Aufga¬ 
be bestehen wollen. 

Die Anleitung ist zwar ins Deutsche 
übersetzt, doch dabei wurde die Hinter¬ 
grundgeschichte einfach unterschla¬ 
gen. In der englischen Fassung macht 
sie über sieben Seiten aus, ist zwar für 
das Spiel unwichtig, soll aber etwas 
Stimmung vermitteln. Es geht um einen 
Menschen, der von bösen Priestern in 
eine merkwürdige Kreatur verwandelt 
wurde. Jetzt will ersieh rächen. 

Die Grafik ist im vierfarbigen Mode 1 
gehalten, aber es wurden viele Schattie¬ 
rungen eingesetzt, und alles ist ausge¬ 
füllt. Scrolling und Bewegungsabläufe 
sind flüssig, die Monster furchterre¬ 
gend groß. Auch der Sound - vor allem 
die stimmungsvolle Melodie - tragen 
zum guten Gesamteindruck bei. 

Action steht im Vordergrund. Aberdas 
Erforschen des Labyrinths ist bei SHA- 
DOW OF THE BEAST etwas stärker 
ausgeprägt als bei den meisten ähnli¬ 
chen Spielen. Manche Gegenstände 
sind unbedingt nötig, um an bestimm¬ 
ten Stellen vorbeizukommen. Dies hat 
zur Folge, daß man relativ stark in den 
Bann des Spieles gezogen wird. 

Für Haudegen mit 
Forscherdrang 

Ein kleiner Sch wachpunkt sind die teil¬ 
weise etwas zu langgezogenen Gänge, 
in denen zu viele Monster des gleichen 
Typsauftreten. 

Dadurch dauert ein einzelnes Spiel 
sehr lang, und es ist doppelt ärgerlich, 
wenn man nach Verlust des letzten Le¬ 
bens wieder ganz von vorne anfangen 
muß. 


2/3’92 CPC 33 

























Software-Review 



SHADOW OF THE BEAST 

Hersteller: Gremlin 
Steuerung: JoystickoderTastalur 
Voraussetzung: lüralleCPCs 
Preis: 74.50 DM 
Be/ugs(|Uelle: EDV-Obcrmeicr 
Bemerkung: liidt nach 

Bewertung: 

Grafik: 2 Sound: 2 

Präsentation: 2 Motivation: 2 

Endnote: 2 


NIGHT SHIFT heißt das neueste 
Werk von Luccisfilm Games, die uns 
CPCIer ja leider nur recht selten mit 
Umsetzungen ihrer Programme versor¬ 
gen. 

Eigentlich hätten Sie ja mißtrauisch 
sein müssen, als die Spielzeugfirma In¬ 
dustrial Mighl and Logic einen Arbei¬ 
ter für die Nachtschicht suchte. Der 
Hinweis, daß die eingesetzten Maschi¬ 
nen “fast nie" Fehlfunktionen aufwei¬ 
sen. klang schon etwas merkwürdig. 
Aber sie verlangten keine Referenzen 
und versprachen dafür großzügige Ent¬ 
lohnungen. Den Hinweis, man müsse 
schon in der Lage sein, zehn Dinge 
gleichzeitig zu tun, haben Sie wohl in 
der Euphorie nicht gelesen... 

Was nicht in dem Stellenangebot stand: 
Wenn Sie nicht die erforderliche An¬ 
zahl von Spielzeugpuppen produzie¬ 
ren. werden Sie gefeuert. Hinzu 
kommt, daß die Maschine, an der Sie 
arbeiten, aus Schrott zusammengebaut 
wurde und dementsprechend merkwür¬ 
dig ist. Dieses Gerät - gleichzeitig das 
Spielfeld ist mehrere Bildschirme 
hoch und besteht aus den unterschied¬ 
lichsten Teilen, die verschiedene Auf¬ 
gaben bei der Produktion haben. 

Arbeit im Puppenhaus 

Je nach Wunsch können Sic in die Rolle 
von Fred oder Fiona Fixit schlüpfen 
und in der Nachtschicht Puppen produ¬ 
zieren. Dazu muß mittels eines Fahrra¬ 
des Strom erzeugt werden, und alle 
wichtigen Teile der Maschine müssen 
kontrolliert werden. Während in derer- 
sten Schicht noch alles relativ harmlos 
verläuft - ein loser Bolzen und ein 
Stecker, der eingesteckt werden muß-, 
entwickelt die Maschine in den höhe¬ 
ren Runden immer mehr ihr Eigenle¬ 
ben. Fließbänder laufen plötzlich 
falsch herum, die Farbe muß von Hand 
eingestellt werden, und niedliche, aber 
extrem störende Tierchen tauchen auf. 
Auch die Betriebsleitung wird in bezug 
auf Ihre Schichtleistung immer an¬ 
spruchsvoller. Das einzige, was sich 


nicht ändert, sind die Hilfsmittel, die 
Sie zur Verfügung haben. Dazu 
gehören Ballons, die Sie nach oben be¬ 
fördern. fleischfressende Pflanzen und 
vieles mehr. Das alles läßt sich jeweils 
nur einmal benutzen und muß dann 
wieder aufgesammelt werden. 

Hat man eine Runde geschafft, be¬ 
kommt man einen Code, der den Zu¬ 
gang zur nächsten Schicht erlaubt. 

Die dargestellte Farben beschränken 
sich zwar auf Blau, Gelb und Rot, aber 
dieElementesind witziggezeichnet. 
Dafür ist die Titelmelodie recht ordent¬ 
lich, und die Soundeffekte machen ei¬ 
nen auf Fehlfunktionen aufmerksam, 
die man sonst vielleicht übersehen wür¬ 
de. Sie klingen aber trotzdem nicht ge¬ 
rade schön. 

Die Ausstattung des Spiels besteht aus 
einer kurzen Anleitung, einem Aus¬ 
schnitt aus einem Magazin und’einem 
Handbuch für Arbeiter von Industrial 
Might and Logic. Dies ist alles Eng¬ 
lisch. Schwierig wird vor allem die 
Entzifferung des Handbuchs - wegen 
eines “Problems mit der Schreibma¬ 
schine” fehlt leider überall der Buch¬ 
stabe 4 ^”. 

Alle Beilagen sind aufwendig und 
schön gemacht, setzen die richtige 
chaotische Atmosphäre für das Spiel. 
Aber sie erschweren den Spielbeginn 
ungemein. 

Wer jedoch lang genug durchhält, wird 
miteinem tollen Spiel belohnt. 

Bis man aber weiß, was zu tun ist. 
möchte man schon fast entnervt auf¬ 
geben. Deshalb haben wir in unserer 
GAMERS MESSAGE in dieser Aus¬ 
gabeeinige Tips,die Ihnen den Einstieg 
erleichtern sollen. 

Genauso ungewöhnlich wie die Story 
ist auch das Spiel selbst. Zumindest hat 
kaum ein anderes Programm in jedem 


Level die gleiche Maschine, die glei¬ 
chen Plattformen und die gleiche Auf¬ 
gabe und ist dabei trotzdem noch ab¬ 
wechslungsreich. Aber weil immer 
mehr Teile der Maschine durch den 
Spieler kontrolliert werden müssen, ist 
doch jedes Level anders als das vorher¬ 
gehende. So bleibt das Spiel dauerhaft 
interessant. 

NIGHT SHIFT ist ein tolles, witziges 
und originelles Spiel! 

Andreas Lober/jg 


NIGHT SHIFT 

Hersteller: Lucasfilm Games 
Steuerung: Joystick oder-Tastatur 
Voraussetzung: lüralleCPCs 
Preis: 74,90 DM 

Zur Verfügung gestellt von: EDV-Oliermeiei 
Bewertung: 

Grafik: 4 Sound: 3 

Präsentation: I Motivation: I 

Endnote: I 


Die Muster erhielten wir von: 

EDV-Obermeier 
Bünder Straße 20 
4972 Löhne 
Tel.: 05732/6126 

und 

MB-Versand 
Postfach 501132 
5000 Köln 50 
Tel.: 02236/47108 

Die Preise beziehen sich an f die jeweili¬ 
ge Firma und -wenn nichts anderes an¬ 
gegeben -aufdie Diskettenversion. 
Preise anderer Händler können davon 
abweichen. 
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Sektoranfang ♦ Sektor weiter - Sektor 


' 20 20 20 42 41 53 00 00 00 80 

Ofl OB OC 05 01 OF 3E 3F 40 

. 4C 45 20 53 55 42 00 00 00 01 

00 00 00 00 00 00 00 00 00 00 00 00 

j 4F 4E 20 20 20 20 42 41 53 01 00 00 48 

* 42 43 44 45 46 47 48 49 00 00 00 00 00 00 00 

00 4 2 4 1 53 4 9 4 3 20 20 20 4 3 4F 45 00 00 00 8W 

,4A 4B 4C 45 4E4F 50 51 52 53 54 55 56Ä^I 


* * # 

D I S K l 

fl Laufnerk 

.f2 Spur/Sektor . 

f5 Drucken 

f6 Speichern f7 h«. 


Byte für Byte 

Ein Diskettenmonitor mit vielen 
Extras 


Nach Spur41 kommt wiederSpurO. 
<SHIFT-Runter> springt zur vorheri¬ 
gen Spur. Nach Spur O kommt wieder 
5pur41. 

<SHIFT -Links> und <-Rechts> lesen 
den jeweils vorherigen beziehungswei¬ 
se den nächsten Sektor. 

Wenn der letzte Sektor einer Spur gele¬ 
sen wurde, wird automatisch die näch¬ 
ste Spur gelesen. So geht es natürlich 
auch rückwärts (erster Sektor). 

Die Funktionen von SECTEDIT lassen 
sich über Tastenkombinationen aufru- 
fen. Jedes Kommando, das Eingaben 
verlangt, kann durch Drücken auf 
<ENTER> (ohne etwas einzugeben) 
oder <ESC> abgebrochen werden! 

Bei Eingaben im Hexmodus wird im¬ 
mer ein# vorangestell t. 

Nun die Kommandos im einzelnen: 

<CTRL A>: Autowrite-Öption an/aus 

Bei eingeschaltetem Autowritc wird je¬ 
der Sektor zurückgeschrieben, bevor 
der nächste gelesen w i rd. 

ACHTUNG !! Diese Funktion sollten 
Sie nicht unbedingt an Ihrer Lieblings¬ 
diskette ausprobieren. Sie könnten ver¬ 
sehentlich wichtige Dateien zerstören !! 


Wie gut, daß Sie nicht zu den oberflächlichen Menschen gehören. Ansonsten 
hätten Sie jetzt vielleicht gedacht: “Schon wieder ein Sektor-Editor, war doch 
schon x-mal da!!”- Sie haben gut daran getan, nicht gleich weiterzublättern. 
“Sectedit 2.6” ist deutlich mehr als “just anotherdisk-editor”. Dieses Pro¬ 
gramm verfügt nämlich über Fähigkeiten, denen Sie nur selten begegnen. 


Die meisten Sektoreditoren können nur 
Disketten im “DATA”- oder “SY- 
STEM”-Format lesen, ln der Regel 
werden auch nur Sektoren von 512 
Bytes Länge verarbeitet. Welches Pro¬ 
gramm kann darüber hinaus fehlerhafte 
Sektoren oder Sektoren mit gelöschter 
“DATA ADDRESS MARK” veränder¬ 
ter ID weiterbearbeiten? Und wenn ein 
Sektor-Editor dann doch so etwas kann, 
ist er auch dementsprechend teuer. 

Mit SECTEDIT in der Version 2.6 kön¬ 
nen Sie folgende Arten von Sektoren 
bearbeiten: 

•Sektoren mit gelöschter DATA AD¬ 
DRESS MARK 

•Sektoren ohne DATA ADDRESS 
MARK 

•Spuren in Single oder Double Density 
•Sektoren von beliebiger Länge 
(natürlich nur bis 4096 Bytes) 

•"nicht vorhandene” Sektoren 
•Sektoren mit Checksummenfehlem 
in Daten oder ID 

•Sektoren,deren IDs nicht stimmen 


•bis zu 40 Sektoren pro Spur 
•unterschiedliche Sektorlängen auf 
einer Spur, 

außerdem alle Sektoren, die mit einem 
uPD765 FDC (der Floppycontroller im 
CPC)geschrieben wurden. 

Kinderleichte 

Handhabung 

Die Bedienung von SECTEDIT ist 
denkbar einfach. 

In einem Fenster mit je 256 Bytes des 
gelesenen Sektors können Sie den Cur¬ 
sorganz normal mit den Cursortasten in 
alle vier Richtungen bewegen. 
Änderungen werden sofort übernom¬ 
men. Das bedeutet, wenn Si q41424344 
eintippen, sehen Sie im ASCII-Fenster 
ABCD. (Im HEX-Fenster steht dann 
natürlich auch#/ 42 4344.) 

Mit den SHIFT-Tasten bekommen die 
Cursortasten weitere Funktionen. 
<SHIFT-Hoch> springt zur nächsten 
Spur. 


<CTRL B>: Sektor-Sort an/aus 

Wenn Sektor-Sort eingeschaltet ist, 
werden die Sektornummern logisch 
sortiert. 

Ansonsten werden die Sektoren in ihrer 
physikalischen Reihenfolge aufgelistet. 

<CTRL C>: Dirctory anzeigen 
Liest, falls vorhanden, das Inhaltsver¬ 
zeichnis dereingelegten Diskette. 

<CTRL D>: Laufwerk wechseln 

Umschalten von Laufwerk A nach B 
oder entsprechend von B nach A. 
Gleichzeitig wird Track 0 gelesen. 

<CTRL F>: Farben ändern 

Hier drücken Sie: 

- ”11" fürdie Hintergrundfarbe (PA PER) 

- ”R” für die Randfarbe (BOR DER) 

- ”S” für die Schriftfarbe (INK I) 

<CTRL H>: Informationen zu einem 
File 

Zuerst muß der Filename eingegeben 
werden. Wird keine Datei mit dem Na¬ 
men gefunden oder enthält die Diskette 
keine Dateien, wird eine Fehlermel¬ 
dung ausgegeben. 

Ansonsten werden folgende Informa¬ 
tionen zum File aufgelistet: 
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- Filetyp: Hier steht eine Hexzahl 
(00 für Basic, 02 für Binärfiles usw.) 

- Anfang: ist die Ladeadresse des Files 
inhexadezimalerSchreibweise. 

- Länge: ist die Dateilänge in Hex. 

- Start: ist, falls vorhanden, die Ein- 
sprungadresse (bei B ASIC-Files steht 

hier immer 0). 

- Lage des Files auf Diskette: 

Hier werden die erste Spur und der erste 
Sektor des Files ausgegeben, also die 
Stelle auf der Diskette, an der das File 
beginnt. 

-Fileattribute: tf 

SYS für versteckte oder DIR für sicht¬ 
bare Files. 

R/O für nur lesbare oder R/W für 
schreib- und lesbare Files. 

<CTRL I>: Sektor-Informationen 

Falls die Spur formatiert ist, erscheinen 
hier folgende Informationen: 

- Die Anzahl der Sektoren auf dieser 
Spur 

- Die Länge des aktuellen Sektors in 
Bytes 

- Die Anzahl der Seiten (Pages) im 
aktuellen Sektor 

- Die Gesamtkapazität der Spur in 
Bytes 

- Der erste SektorderSpur. 

Die Gesamtlänge der Spur stimmt nur 
bei Sektorgrößen bis 6144 Bytes. 
Größere Sektoren passen ja nicht auf ei¬ 
ne Spur, also wird als Spurgröße 0 
Bytes angegeben. 

<CTRL K>: Spur kopieren 

Die aktuelle Spur wird kopiert. 

Zuerst muß das Ziellaufwerk eingege¬ 
ben werden, also das Laufwerk, auf 
welches die Spur kopiert werden soll. 
Nach dem Lesen der Spur werden Sie 


gefragt, ob Sie die Sektor-IDs editieren 
wollen. 

Editieren der Sektor-IDs: 

Hier können folgende Einträge der ID 
geändert werden: 

- Spurnummer (beliebiger Wert) 

- Kopfnummer (beliebiger Wert) 

- Sektornummer (beliebig, abersiehe 
unten) 

- Seklorlänge (#02 für 512 Bytes) 

Links wird jeweils der alte Werl ange¬ 
zeigt. Dieser kann mit <ENTER> über¬ 
nommen oder durch Eingabe einer 
Hexzahl verändert werden. 

Sie sollten nie mehrmals dieselbe Sek- 
tomummer verwenden, da der FDC 
(Floppy Disc Controller) beim Lesen 
diese Sektoren nicht unterscheiden 
kann, und Sektoren mit derselben 
Nummer sozusagen “verschluckt” 
werden. Auch sollte die neue Sektor¬ 
länge niemals größer sein als die alte, 
da sonst nachfolgende Sektoren oder 
die Index Ad ress Mark überschrieben 
werden können (die Spur ist dann sozu¬ 
sagen unformatiert). Außerdem gehen 
beim Kürzen eines Sektors von zum 
Beispiel 1024 auf 512 Bytes die letzten 
512 Bytes in den nächsten Sektor über 
(falls vorhanden). 

<CTRL N>: Neue Parameter einge¬ 
ben 

Hier wird zuerst die Spur eingegeben. 
Nach dem Lesen der IDs wird dann wie 
bei <CTRL V> der Sektor ausgewählt. 

<CTRLP>: Seite wechseln 
Wechselt die Seite des aktuellen Sek¬ 
tors. Bei Sektoren mit 512 Bytes Länge 
wird automatisch zwischen zwei Seiten 


umgeschaltet, sonst kann die Seiten¬ 
nummer in Hex eingegeben werden. 
Bei 

- 128 Bytes gibt es nur eine halbe Seite 
(die ersten 8 Zeilen) 

- 256 Bytes gibt es eine Seile (hierbei 
wird nicht umgeschaltet) 

- 512 Bytes gibt es zwei Seiten, die 
automatisch umgeschaltet werden. 

- 1024 Bytes gibt es 4 Seiten (#00 -#03) 

- 2048 Bytes gibt es 8 Seiten (#00 -#07) 
-4096 Bytes gibt es 16 Seilen 

(#0()-#0F) 

<CTRL Q>: Bytefolge auf Diskette 
suchen 

Zuerst wird nach der Art der Bytes ge¬ 
fragt. 

Hier ist dann ”H" für Hexzahlen und 
”A” für ASCIl-Zeichenfolgen einzu¬ 
tippen. 

Nun können Sie die Suchbytes einge¬ 
ben (maximal 16 Bytes). Falls Sie we¬ 
niger als 16 Bytes suchen wollen, 
drücken Sie nach Eingabe der Bytes be¬ 
ziehungsweise der Zeichenfolge ein¬ 
fach <ENTER>. 

Die Suche beginnt ab dem aktuellen 
Track im angemeldeten Laufwerk. 
Wenn Sie also im Laufwerk B, auf 
Track 39 stehen, wird auch nur bis 
Track 41 gesucht. 

Wurden die Bytes gefunden, wird die 
Lage der Bytes im Sektor als Hexadres- 
se angegeben und danach gefragt, ob 
weitergesucht werden soll, liier muß 
einfach nur “J” oder “N” gedrückt wer¬ 
den. 

Die Suche wird abgebrochen, wenn: 

- die Bytes gefunden wurden, und nicht 
weitergesucht werden so 11. 

- während der Suche eine Taste ge¬ 
drückt wurde 



Mit <ENTEH> oder <CTRL+J> werden alle Befehle mit einer kurzen 
Erläuterung auf dem Bildschirm angezeigt. 
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Programm 


- oder die letzte Spur (Spur41) durch¬ 
sucht wurde. 

<CTRL R>: Re-Read Sektor 

Der zuletzt eingelesene Sektor wird 
nocheinmal eingelesen. Dies hilft (al¬ 
lerdings nur dann, wenn der Sektor 
nicht schon geschrieben wurde), wenn 
Sie falsche Änderungen rückgängig 
machen oder die Änderungen kontrol¬ 
lieren wollen. 

<CTRLS>: Sektor schreiben 

Der zuletzt eingelesene Sektor wird 
(mit allen Änderungen) nach einer Si¬ 
cherheitsabfrage auf die Diskette 
zurückgeschrieben. 

<CTRL V>: Sektor auswählen 
Hier können Sie einen Sektor der Spur 
auswählen. Sie geben einfach die Num¬ 
mer des Sektors ein, und er wird, falls 
vorhanden, e i nge lese n. 

<CTRL W>: Wechsel zwischen 
ASCII und HEX 

Der Eingabe-Cursor schaltet zwischen 
dem ASCII- und HEX-Fenster um. Al¬ 
le Eingaben werden dann nur noch in 
1 lexadezimalzahlen beziehungsweise 
in ASCII-Zeichen angenommen. 

<ENTER> (<CTRL M>): Komman¬ 
doliste 

Zu jedem CTRL-Befehl wird eine 
Kurz beschreibung ausgegeben. 

<ESC>: Zurück zum BASIC 

Sie können SECTEDIT danach mit 

CALL &9000 neu starten. 

Weitere Infos 

N eben den 1 n l'orm at i onen über d ie Spu r 
werden nach dem Lesen eines Sektors 


auch seine ID, zum Beispiel #0A #00 
#C3 #02, und einige seiner Status-Re¬ 
gister ausgegeben. 

Die Bytes in der ID haben folgende Be¬ 
deutung: 

1. Die Spurnummer des Sektors, wel¬ 
che a be r n i c h t s t i m m e n m u ß. 

2. Die Kopfnummer des Sektors. Auch 
hier kann ein beliebiger Wert stehen. 

3. Die Sektornummer. Die ist immer 
richtig (muß sie auch sein). 

4. Die Sektorgröße in einer codierten 
Form. Das bedeutet: 

#00= 128 Bytes, #01 = 256 Bytes, #02 
= 512 Bytes (wie bei Amsdos-Forma- 
ten), #03 = 1024 Bytes, #04 = 2048 
Bytes und #05 = 4096 Bytes. 

Alle anderen Werte größer als fünf sind 
unsinnig oder fehlerhaft, wobei der 
Wert sechs eine Ausnahme darstelll. 
Bei manchen neueren Spieldisketten 
wird ein Kopierschutz verwendet, wo¬ 
bei die Sektoren theoretisch 8192 Bytes 
lang sind. 

Da auf eine MFM-formalierte Spur 
aber nur zirka 6500 Bytes passen, wird 
der Lesevorgang nach 6144 Bytes ab¬ 
gebrochen. Diese Sektoren lassen sich 
auch mit SECTEDIT lesen, allerdings 
ist es unsinnig, sie auch zu schreiben 
(was mit etwas Aufwand schon mög¬ 
lich wäre), da dieser Schutz sowieso 
nur bei Originaldisketten verwendet 
wird, und auf die will ja wohl niemand 
etwas schreiben. 

Bei den Statusregistern gibt es folgende 
Möglichkeiten: 

CM-CONTROL MARK 

Der gelesene Sektor hat eine gelöschte 
DATA ADDRESS MARK 

WC - WRONG CYLINDER 

Die gelesene Spurnummer oder Kopf¬ 
nummer in der ID stimmt nicht mit der 


physikalischen Spur- beziehungsweise 
Kopfn ummer überein. 

DE-DATA ERROR 

Der Sektor ist kaputt, die gelesenen Da¬ 
ten stimmen nicht mit der eingetra¬ 
genen Checksumme überein. 

ND -NO DATA 

Der Sektor ist nicht vorhanden, hat aber 
trotzdem eine ID. Diese Meldung tritt 
aber auch beim versuchten Zugriff auf 
nicht vorhandene Leseköpfe auf (siehe 
WC). In beiden Fällen wird derSektor- 
buffer mit #E5 gefüllt. Dieser Sektor 
kann auch nicht geschrieben werden, 
da er zwar eine ID hat. aber entweder 
keine ID ADRESS MARK, ein SYNC 
oder GAP#2 zu klein oder das Sektor¬ 
feld (DATAFIELD) nicht vorhanden ist 
(Sektorl änge=0 By tes). 

MD-MISSING DAM 

Bei dem gelesenen Sektor fehlt die DA¬ 
TA ADDRESS MARK. 

Links neben den IDs wird die Auf¬ 
zeichnungsdichte der Spur angezeigt: 
MF für Single und MFM für Double 
Density. Fehlerhafte Eingaben werden 
soweit als möglich abgefangen. 

Abtippen des Dataladers 

Tippen Sie den BASIC-Lader ab. und 
speichern Sie ihn zur Sicherheit auf 
Diskette. Wenn alles in Ordnung ist. 
wird das Programm “SEKTOR.BIN" 
abgespeichert, welches dann einfach 
mit RUN "SEKTOR” geladen werden 
kann. 

SECTEDIT läuft übrigens nicht unter 
VDOS. Auch auf den neuen CPCs mit 
der Bezeichnung "plus” ist dieses Pro¬ 
gramm nicht lauffähig. 

Oliver Mayer/rs 


1000 'SEKTOR.LAD [495] 

1010 '(c) 1991 Oliver Mayer & CPC Internat [673] 
ional 

1020 'erstellt Programm SEKTOR.BIN [1428] 

1030 'fuer CPC 464, 664, 6128 [1345] 

1040 MEMORY &8FFF [207] 

1050 FOR adr=&9000 TO &A652 STEP 10 [1360] 

1060 FOR i=adr TO adr+ 9 [985] 

1070 READ b$ [315] 

1080 byte=VÄL("&"+b$) [465] 

1090 POKE i,byte [294] 

1100 NEXT i [375] 

1110 NEXT adr [547] 

1120 SAVE"SEKTOR.BIN",b,&9000,&1652,&9000 [1285] 

1130 END [HO] 

1140 DATA 31,00,C0,0E,07,21,FF,AB,11,00 [868] 

1150 DATA A7,CD,CE,BC,CD,55,9D,3E,FF,32 [623] 

1160 DATA 78,BE,32,47,BE,3E,02,32,66,BE [1022] 
1170 DATA 21,03,01,22,2E,A6,21,03,39,22 [1591] 

1180 DATA 30,A6,21,00,10,22,32,A6,22,34 [1443] 

1190 DATA A6,CD,FF,BB,CD,4E,BB,CD,F9,9C [1327] 

1200 DATA 3E,02,CD,0E,BC,3E,01,32,3E,A6 [2222] 


1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

1420 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


CD,B4, 
66,BB, 
3F,BB, 
CI,CD, 
32,BC, 
CD,48, 
F 8,9 F, 
90,21, 
CD,B2, 
A0,CD, 
AF,32, 
CD,C5, 
07,CD, 
56,23, 
7E,B7, 
9F,21, 
CD,75, 
95,FE, 
96,3A, 
14,CD, 
F5,CD, 
82,BE, 


BB, 21 
AF, CD 
01,00 
32 ,BC 
CD, 9C 
9D, 21 
CD, C8 
4 2 , A2 
92,3E 
C8,90 
43,A6 
9A, 21 
5A, BB 
5E, 23 
CD, 5A 
F8,9F 
BB, 3E 
2A, 3 0 
41, A6 
75,BB 
84, BB 
BE,28 


,02,00 
,B4,BB 
,00,C5 
,3E,01 
,BB,21 
,BE,9F 
,90,21 
,CD,C8 
,01,CD 
,CD,B8 
,32,00 
,03,01 
,CD,B8 
,E5,EB 
,BB,23 
,CD,C8 
,07,CD 
,EE,32 
,B7,CA 
,CD,81 
,3A,5 3 
,08,23 


,11,11, 
,21,02, 
,CD,38, 
,01,1A, 
,01,01, 
,CD,C8, 
,8A,A0, 
,90,CD, 
,EA,9E, 
,9F,CD, 
,A7,3 2, 
,CD,75, 
,9F,C3, 
,CD,75, 
,20,F8, 
,90,21, 
, 5A, BB, 
,44,A6, 
,DD,91, 
, BB ,CD, 
,A6,47, 
,23,23, 


4F, CD 
0A, CD 
BC, AF 
1A, CD 
06,50 
90,21 
CD, C8 
87,92 
21,5A 
18,BB 
40, A6 
BB, 3E 
01,96 
BB, El 
C3,B8 
14,08 
CD,96 
CD, 5E 
21,14 
57,95 
Fl,21 
23,10 


[2159 ] 
[1830] 
[1729 ] 
[ 1467 ] 
[1407] 
[1040] 
[1845] 
[ 2221 ] 
[1152] 
[1263] 
[1898] 
[1492] 
[ 1703] 
[364] 

[1706] 
[334] 

[1539] 
[1771] 
[1687] 
[1913] 
[15.11] 
[1043] 
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1430 DATA F7,18,DD,3A,53,A6,37,3F,98,32 [1751] 

1440 DATA 49,A6,CD,A4, 94 ,CD,E3,9 7,C3,C8 [1712] 

1450 DATA 91,E5,CD,84,BB,CD,3C,9D,CD,F8 [1399] 
1460 DATA 97,CD,8D,92,21,03,01,CD,75,BB [1662] 
1470 DATA El,06,10,C5,7C,D6,10,CD,9D,91 [1367] 

1480 DATA 7D,CD,9D,91,CD,87,91,06,10,E5 [1707] 
1490 DATA 7E,CD,9D,91,3E,20,CD,5A,BB,23 [1544] 

1500 DATA 10,F4,CD,87,91,El,06,10,7E,CD [1322] 
1510 DATA 8F,91,23,10,F9,3E,0A,CD,5A,BB [1170] 

1520 DATA 3E,OD,CD,5A,BB,C1,10,C9,C3,B8 [1759] 
1530 DATA 9F,3E,20,CD,5A,BB,C3,5A,BB,FE [1197] 

1540 DATA 20,38,05,FE,FO,DA,5A,BB,3E,2E [1424] 

1550 DATA C3,5A,BB,F5,1F,1F,IF,1F,CD,A6 [1966] 

1560 DATA 91,F1,E6,0F,FE,OA,38,02,C6,07 [2226] 

1570 DATA C6,30,C3,5A,BB,26,00,6F,CD,00 [1283] 

1580 DATA B9,CD,79,EE,C3,03,B9,21,00,10 [2132] 

1590 DATA 22,32,A6,22,34,A6,31,00,CO,21 [2008] 

1600 DATA 03,07,22,2E,A6,21,03,39,22,30 [2371] 

1610 DATA A6,CD,8D,92,CD,B8,9F,CD,OD,95 [1556] 

1620 DATA CD,06,BB,FE,01,CC,AO,92,FE,02 [1433] 

1630 DATA CC,E5,9E,FE,03,CA,7B,9D,FE,04 [1276] 

1640 DATA CA,A4,9A,FE,06,CA,6D,9C,FE,08 [1384] 

1650 DATA CA,B8,9D,FE,09,CA,48,98,FE,OB [2047] 

1660 DATA CA,38,99,FE,OD,CA,63,9D,FE,OE [825] 

1670 DATA CA,D7,97,FE,10,CA,BC,92,FE,11 [2182] 

1680 DATA CA,DB,9A,FE,12,CC,5F,9C,FE,13 [1975] 

1690 DATA CC,1B,98,FE,16,CA,FB,90,FE,17 [1298] 

1700 DATA CC,71,92,FE,80,DC,18,95,FE,FO [1160] 

1710 DATA CC,10,93,FE,Fl,CC,32,93,FE,F2 [1821] 

1720 DATA CC,75,93,FE,F3,CC,54,93,FE,F4 [2071] 

1730 DATA CC,4E,94,FE,F5,CC,68,94,FE,F6 [1550] 

1740 DATA CC,94,94,FE,F7,CC,78,94,FE,FC [999] 

1750 DATA CA,46,9C,CD,8D,92,CD,19,BD,CD [1998] 

1760 DATA B8,9F,C3,DD,91,CD,C6,95,CD,B8 [1973] 

1770 DATA 9F,3A,3D,A6,EE,01,32,3D,A6,B7 [1099] 

1780 DATA 28,05,21,28,AO,18,03,21,32,AO [1433] 

1790 DATA C3,C8,90,21,14,2A,CD,75,BB,2A [1750] 

1800 DATA 32,A6,7C,D6,10,CD,9D,91,7D,C3 [1555] 

1810 DATA 9D,91,3A,3E,A6,FE,01,28,OB,3E [1058] 

1820 DATA 01,32,3E,A6,21,6D,AO,C3,C8,90 [1741] 

1830 DATA AF,32,3E,A6,21,7B,A0,C3,C8,9O [1719] 

1840 DATA 3A,3C,A6,FE,02,DA,DD,91,28,32 [1580] 

1850 DATA CD,C6,95,21,14,1F,CD,75,BB,CD [1832] 

1860 DATA 81,BB,AF,CD,5B,95,F5,CD,84,BB [1433] 

1870 DATA 3A,3C,A6,47,F1,B8,30,E7,32,42 [2320] 

1880 DATA A6,21,00,10,57,IE,00,19,22,34 [1259] 

1890 DATA A6,22,32,A6,CD,E3,97,C3,C8,91 [853] 

1900 DATA CD,C6,95,21,14,1E,CD,75,BB,3A [1717] 

1910 DATA 42,A6,EE,01,32,42,A6,F5,CD,9D [681] 

1920 DATA 91,Fl,18,D2,2A,2E,A6,7D,FE,04 [1810] 

1930 DATA DA,96,93,CD,C6,95,2D,22,2E,A6 [746] 

1940 DATA 2A,30,A6,2D,22,30,A6,2A,32,A6 [1705] 

1950 DATA 11,F0,FF,19,22,32,A6,C9,2A,2E [1804] 

1960 DATA A6,7D,FE,12,D2,B6,93,CD,C6,95 [902] 

1970 DATA 2C,22,2E,A6,2A,30,A6,2C,22,30 [2442] 

1980 DATA A6,2A, 3 2 , A6,1.1,10,00,19,22,32 [1295 ] 

1990 DATA A6,C9,CD,C6,95,2A,2E,A6,7C,FE [1759] 

2000 DATA 32,D2,D6,93,24,24,24,22,2E,A6 [1769] 

2010 DATA 2A,30,A6,24,22,30,A6,2A,32,A6 [1790] 

2020 DATA 23,22,32,A6,C9,2A,2E,A6,7C,FE [1406] 

2030 DATA 08,DA,F8,93,CD,C6,95,25,25,25 [1479] 

2040 DATA 22,2E,A6,2A,30,A6,25,22,30,A6 [1131] 

2050 DATA 2A,32,A6,2B,22,32,A6,C9,CD,C6 [2435] 

2060 DATA 95,2A,2E,A6,2E,12,22,2E,A6,2A [1232] 

2070 DATA 30,A6,2E,12,22,30,A6,2A,32,A6 [1469] 

2080 DATA 11,FO,00,19,22,32,A6,C3,OD,95 [1957] 

2090 DATA CD,C6,95,2A,2E,A6,2E,03,22,2E [2249] 

2100 DATA A6,2A,30,A6,2E,03,22,30,A6,2A [1816] 

2110 DATA 32,A6,11,10,FF,19,22,32,A6,C3 [1283] 

2120 DATA 0D,95,2A,2E,A6,7D,FE,12,D2,1D [1319] 

2130 DATA 94,26,07,2C,22,2E,A6,2A,30,A6 [1012] 

2140 DATA 26,39,2C,22,30,A6,2A,32,A6,23 [2110] 

2150 DATA 22,32,A6,C3,OD,95,CD,C6,95,2A [1943] 

2160 DATA 2E,A6,7D,FE,04,DA,32,94,26,34 [1939] 

2170 DATA 2D,22,2E,A6,2A,30,A6,26,48,2D [1450] 

2180 DATA 22,30,A6,2A,32,A6,2B,22,32,A6 [1517] 

2190 DATA C3,OD,95,2A,34,A6,22,32,A6,21 [1534] 

2200 DATA 03,07,22,2E,A6,21,03,39,22,30 [2371] 

2210 DATA A6,C3,ÖD,95,CD,C6,95,2A,34,A6 [1375] 

2220 DATA 11,FF,00,19,22,32,A6,21,12,34 [1402] 

2230 DATA 22,2E,A6,21,12,48,22,30,A6,C3 [1801] 

2240 DATA OD,95,CD,31,9D,3A,44,A6,FE,29 [1881] 

2250 DATA CA,63,94,3C,32,44,A6,CD,5E,96 [1428] 

2260 DATA C3,E3,97,AF,CD,5A,94,C9,CD,31 [2501] 

2270 DATA 9D,3A,44,A6,B7,20,02,3E,2A,3D [1530] 

2280 DATA CD,5A,94,C9,CD,31,9D,3A,53,A6 [1581] 

2290 DATA 3D,47,3A,49,A6,B8,CA,4E,94,3A [1100] 

2300 DATA 49,A6,3C,32,49,A6,CD,A4,94,C3 [1951] 

2310 DATA E3,97,CD,31,9D,3A,49,A6,B7,CA [1973] 

2320 DATA BD,94,3D,32,49,A6,18,EA,21,80 [1695] 

2330 DATA BE,B7,28,07,11,04,00,47,19,10 [1421] 


2340 DATA FD,11,2A,A6,01,04,00,ED,BO,CD 
2350 DATA 06,9F,C9,CD,31,9D,3A,44,A6,B7 
2360 DATA 20,02,3E,2A,3D,32,44,A6,CD,5E 
2370 DATA 96,3A,53,A6,3D,32,49,A6,CD,A4 
2380 DATA 94,CD,E3,97,C9,2A,2E,A6,CD,75 
2390 DATA BB,3E,18,CD,5A,BB,2A,32,A6,7E 
2400 DATA CD,9D,91,3E,18,CD,5A,BB,C9,2A 
2410 DATA 30,A6,CD,75,BB,3E,18,CD,5A,BB 
2420 DATA 2A,32,A6,7E,CD,8F,91,3E,18,CD 
2430 DATA 5A,BB,C9,3A,3D,A6,B7,CA,DD,94 
2440 DATA CD,F5,94,C9,F5,FE,20,38,28,3A 
2450 DATA 3D,A6,B7,20,13,2A,2E,A6,CD,75 
2460 DATA BB,Fl,A7,CD,57,95,2A,32,A6,77 
2470 DATA CD,54,93,C9,2A,30,A6,CD,75,BB 
2480 DATA 2A,32,A6,Fl,77,CD,54,93,C9 , Fl 
2490 DATA C9,CD,06,BB,FE,OD,28,05,CD,57 
2500 DATA 95,47,C9,78,C3,9D,91,CD,6B,95 
2510 DATA DO,C5,07,07,07,07,4F,37,CD,6B 
2520 DATA 95,30,02,Bl,37,CI,C9,CD,8A,95 
2530 DATA FE,OD,C8,D6,30,38,F6,FE,OA,38 
2540 DATA OB,D6,07,FE,10,30,EC,FE,OA,3F 
2550 DATA 30,E7,F5,CD,A6,91,Fl,C9,DC,06 
2560 DATA BB,FE,61,D8,FE,7B,DO,D6,20,C9 
2570 DATA 06,02,21,00,BE,CD,81,BB,CD,06 
2580 DATA BB,FE,30,38,F9,FE,3A,30,F5,77 
2590 DATA CD,5A,BB,23,10,EE,CD,84,BB,3A 
2600 DATA 00,BE,E6,OF,47,AF,C6,OA,10,FC 
2610 DATA 47,3A,01,BE,E6,OF,80,C9,E5,F5 
2620 DATA 2A,2E,A6,CD,75,BB,2A,32 , A6,7E 
2630 DATA F5,CD,9D,91,2A,30,A6,CD,75,BB 
2640 DATA Fl,CD,8F,91,Fl,El,C9,3A,4B,A6 
2650 DATA CB,57,CO,21,02,A3,CD,C8,90,CD 
2660 DATA 3F,96,C9,CD,55,9D,21,EO,A2,18 
2670 DATA Fl,21,23,A3,CD,C8,90,CD,55,9D 
2680 DATA CD,OA,98,21,14,14,CD,75,BB, 3E 
2690 DATA 20,CD,5A,BB,CD,5A,BB,21,16,32 
2700 DATA 06,ID,CD,48,9D,3E,01,32,53,A6 
2710 DATA 3D,32,49,A6,32,52,BE,32,41,A6 
2720 DATA 21,00,10,22,54,9F,3A,40,A6,B7 
2730 DATA C2,5D,9B,CD,E3,97,C3,BF,91,21 
2740 DATA 19,07,CD,75,BB,3A,43,A6,C6,41 
2750 DATA CD,5A,BB,CD,B8,9F,CD,18,BB,21 
2760 DATA 19,01,06,28,CD,48,9D,C3,B8,9F 
2770 DATA AF,32,53,A6,32,3C,A6,32,2B,A6 
2780 DATA 21,18,OA,06,3C,CD,48,9D,ED,5B 
2790 DATA 43,A6,DF,23,A6,01,7E,FB,3E, OA 
2800 DATA CD,A5,9F,3A,43,A6,CD,A5,9F,CD 
2810 DATA 7A,9F,21,39,A6,06,03,3A,4D,BE 
2820 DATA CB,47,20,07,CB,B6,23,10,FB,18 
2830 DATA 05,CB,F6,23,10,FB,CD,CI,97,3A 
2840 DATA 4C,BE,E6,CO,C2,FB,95,21,26,A6 
2850 DATA 11,2A,A6,01,04,00,ED,BO,3A,39 
2860 DATA A6,CD,15,9F,CD,CI,97,FD,67,DD 
2870 DATA 21,53,A6,11,80,BE,21,4F,BE,01 
2880 DATA 04,00,ED,BO,CD,CI,97,F5,21,4F 
2890 DATA BE,01,04,00,ED,BO,DD,34,00,FD 
2900 DATA 44,Fl,B8,20,EB,3A,3F,A6,B7,28 
2910 DATA 48,3A,53,A6,4P,FE,01,28,40,DD 
2920 DATA 21,82,BE,CB,84,41,05,DD,7E,04 
2930 DATA 57,DD,5E,00,93,30,20,C5,DD,E5 
2940 DATA DD,E5,El,23,23,DD,2B,DD,2B,06 
2950 DATA 04,56,DD,5E,00,73,DD,72,00,23 
2960 DATA DD,23,10,F3,DD,El,CI,CB,C4,DD 
2970 DATA 23,DD,23,DD,23,DD,23,10,CC,CB 
2980 DATA 44,20,C0,21,5A,AO,3A,39,A6,E6 
2990 DATA 40,20,03,21,64,AO,CD,C8,90,21 
3000 DATA 18,OB,CD,75,BB,3A,53,A6,47,21 
3010 DATA 82,BE,C5,E5,7E,CD,9D,91,3E,20 
3020 DATA CD,5A,BB,El,23,23,23,23,CI,10 
3030 DATA ED,21,00,10,22,34,A6,22,32,A6 
3040 DATA 3A,53,A6,47,21,00,00,DD,21,83 
3050 DATA BE,C5,DD,7E,00,CD,B2,97,3A,3C 
3060 DATA A6,57,IE,00,19,11,04,00,DD,19 
3070 DATA CI,10,EA,22,4C,A6,AF,32,49,A6 
3080 DATA 32,42,A6,CD,A4,94,3E,01,32,41 
3090 DATA A6,21,14,IE,CD,75,BB,3A,42,A6 
3100 DATA CD,9D,91,CD,8D,92,C9,3A,52,BE 
3110 DATA FE,02,38,07,3D,47,3E,01,87,10 
3120 DATA FD,32,3C,A6,C9,01,7E,FB,3A,3B 
3130 DATA A6,CD,A5,9F,3A,43,A6,CD,A5,9F 
3140 DATA CD,7A,9F,3A,51,BE,C9,CD,C6,95 
3150 DATA 21,00,10,22,34,A6,C3,DD,90,21 
3160 DATA 03,07,22,2E,A6,21,03,39,22,30 
3170 DATA A6,2A,34,A6,22,32,A6,C3,37,91 
3180 DATA 3A,41,A6,B7,28,0C,21,14,14,CD 
3190 DATA 75,BB,3A,2C,A6,CD,9D,91,21,14 
3200 DATA 08,CD,75,BB,3A,44,A6,CD,B3,91 
3210 DATA 3E,20,C3,5A,BB,CD,C6,95,21,6C 
3220 DATA A2,CD,C8,90,CD,06,BB,CB,AF,FE 
3230 DATA 4E,CA,C5,9A,FE,4Ä,20,F2,CD,C5 
3240 DATA 9A,CD,FA,9E,3A,4D,BE,CB,4F,CA 
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[1147] 
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[1276] 
[1400] 
[1728] 
[425] 
[1068] 
[2198] 
[1559] 
[2173] 
[1084] 
[2810] 
[958] 
[1742] 
[1785] 
[1513] 
[1419] 
[1997] 
[1343] 
[1573] 
[1418] 
[1634] 
[1515] 
[2152] 
[1850] 
[1371] 
[1803] 
[ 2020 ] 
[2139] 
[1695] 
[2042] 
[2259] 
[1299] 
[654] 
[2278] 
[1294] 
[2104] 
[1240] 
[2227] 
[799] 
[1637] 
[1770] 
[1643] 
[2337] 
[1621] 
[1698] 
[949] 
[1085] 
[2009] 
[1065] 
[1347] 
[1163] 
[1903] 
[1527] 
[1737] 
[1524] 
[1622] 
[1607] 
[2107] 
[2099] 
[2017] 
[1364] 
[1519] 
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38 CPC 2/3'92 

















Programm 


3250 DATA B8,9F,3E,07,CD,5A,BB,C3,B8,9F [1339] 

3260 DATA CD,3C,9D,21,37,A3,CD,C8,90,3A [1194] 
3270 DATA 41,A6,B7,20,08,21,52,A3,CD,C8 [1503] 

3280 DATA 90,18,45,21,75,A3,CD,C8,90,3A [1985] 

3290 DATA 53,A6,CD,B3,91,21,8C,A3,CD,C8 [1038] 

3300 DATA 90,21,80,00,3A,3C,A6,B7,28,03 [1917] 

3310 DATA 67,2E,00,CD,B6,91,21,A3,A3,CD [1380] 

3320 DATA C8,90,3A,3C,A6,CD,B3,91,21,BA [1148] 

3330 DATA A3,CD,C8,90,2A,4C,A6,CD,B6,91 [1332] 

3340 DATA 21,CE,A3,CD,C8,90,3A,82,BE,CD [2292] 

3350 DATA 9D,91,CD,B8,9F,CD,18,BB,2A,34 [1147] 

3360 DATA A6,22,32,A6,CD,37,91,CD,B8,9F [1424] 

3370 DATA C3,C8,91,21,E2,A3,CD,C8,90,CD [1580] 
3380 DATA 1F,99,3A,4E,BE,CB,77,C4,E7,98 [1645] 

3390 DATA CB,67,C4,EF,98,3A,4D,BE,CB,6F [2020] 

3400 DATA C4,FF,98,CB,47,C4,F7,98,CB,57 [1743] 

3410 DATA C4,07,99,06,0F,CD,4D,9D,C9,21 [1353] 

3420 DATA EC,98,18,27,2F,43,4D,21,F4,98 [996] 

3430 DATA 18,1F,2F,57,43,21,FC,98,18,17 [1491] 

3440 DATA 2F,4D,44,21,04,99,18,0F,2F,44 [1508] 

3450 DATA 45,21,10,99,CD,13,99,C3,55,9D [2072] 

3460 DATA 2F,4E,44,F5,06,03,7E,CD,5A,BB [2189] 

3470 DATA 23,10,F8,Fl,C9,06,04,21,4F,BE [1806] 

3480 DATA C5,3E,23,CD,5A,BB,7E,CD,9D,91 [1241] 

3490 DATA 3E,20,CD,5A,BB,23,CI,10,ED,C9 [1004] 

3500 DATA CD,3C,9D,21,E8,A3,CD,C8,90,21 [1703] 

3510 DATA 05,14,CD,75,BB,CD,81,BB,CD,18 [826] 

3520 DATA BB,FE,OD,CA,9E,9A,CB,AF,FE,41 [1100] 

3530 DATA 28,04,FE,42,20,E5,CD,5A,BB,C6 [1565] 

3540 DATA BF,F5,2A,43,A6,22,45,A6,CD,84 [1892] 

3550 DATA BB,21,23,A4,CD,C8,90,3A,53,A6 [1826] 

3560 DATA 47,DD,21,80,BE,21,00,20,11,2A [2245] 

3570 DATA A6,C5,D5,E5,22,54,9F,06,04,DD [2260] 

3580 DATA 7E,00,12,DD,23,13,10,F7,3A,2D [1467] 
3590 DATA A6,FE,06,DC,06,9F,El,3A,2D,A6 [1712] 

3600 DATA FE,05,30,04,57,IE,00,19,Dl,C1 [963] 

3610 DATA 10,D7,Fl,32,43,A6,21,4B,A4,CD [2378] 

3620 DATA C8,90,CD,81,BB,CD,06,BB,CB,AF [1719] 

3630 DATA FE,4E,28,42,FE,4A,20,EA,CD,84 [2732] 

3640 DATA BB,CD,5A,BB,11,80,BE,3A,53,A6 [1327] 

3650 DATA 47,C5,21,09,01,CD,75,BB,06,04 [1548] 

3660 DATA 21,5F,A4,C5,D5,CD,D2,90,E5,1A [1466] 

3670 DATA 47,CD,9D,91,21,8D,A4,CD,D2,90 [1181] 

3680 DATA CD,81,BB,CD,47,95,CD,84,BB,El [1093] 
3690 DATA Dl,78,12,13,CI,10,DE,CI,10,CF [1328] 
3700 DATA 21,35,A4,CD,C8,90,CD,96,95,FE [1139] 
3710 DATA 2A,30,F3,32,44,A6,57,3A,43,A6 [1986] 
3720 DATA 5F,DF,23,A6,21,96,A4,CD,C8,90 [1589] 

3730 DATA 01,7E,FB,3A,3A,A6,F6,OD,CD,A5 [1646] 

3740 DATA 9F,3A,43,A6,CD,A5,9F,3A,83,BE [1836] 

3750 DATA FE,06,38,01,AF,CD,A5,9F,3A,53 [1266] 

3760 DATA A6,CD,A5,9F,3E,08,CD,A5,9F,3E [1513] 

3770 DATA E5,F3,21,80,BE,CD,A5,9F,CD,70 [609] 

3780 DATA 9F,CD,7A,9F,3A,53,A6,47,DD,21 [1113] 

3790 DATA 80,BE,21,00,20,11,2A,A6,C5,D5 [1746] 

3800 DATA E5,22,54,9F,06,04,DD,7E,00,12 [1495] 

3810 DATA DD,23,13,10,F7,3A,2D,Ä6,FE,06 [1150] 

3820 DATA DC,FA,9E,El,3A,2D,A6,FE,05,30 [2347] 

3830 DATA 04,57,1E,00,19,Dl,CI,10,D7,FB [1669] 
3840 DATA 2A,45,A6,22,43,A6,21,00,10,22 [2066] 

3850 DATA 54,9F,CD,5E,96,CD,06,9F,CD,E3 [2561] 
3860 DATA 97,C3,C8,91,CD,C6,95,3A,43,A6 [992] 

3870 DATA EE,01,32,43,A6,32,00,A7,CD,C5 [1856] 
3880 DATA 9A,AF,32,44,A6,CD,5E,96,CD,06 [2719] 

3890 DATA 9F,CD,E3,97,C3,C8,91,21,7B,A2 [657] 
3900 DATA CD,C8,90,3A,43,A6,C6,41,CD,5A [1627] 

3910 DATA BB,06,04,CD,4D,9D,C3,B8,9F,CD [2354] 
3920 DATA 3C,9D,21,AC,A4,CD,C8,90,21,C3 [1779] 
3930 DATA A4,CD,C8,90,CD,81,BB,CD,06,BB [1053] 

3940 DATA CB,AF,CD,84,BB,FE,OD,CA,F3,9B [2284] 

3950 DATA CD,8F,91,FE,41,28,2C,FE,48,20 [1119] 

3960 DATA DF,AF,CD,7C,92,21,DB,A4,CD,C8 [1585] 

3970 DATA 90,CD,81,BB,21,00,BE,F5,CD,57 [1166] 

3980 DATA 95,30,OF,77,23,3E,2C,CD,5A,BB [1211] 

3990 DATA Fl,3C,FE,10,38,ED,18,1B,Fl,18 [1348] 

4000 DATA 18,3E,01,CD,7C,92,21,DB,A4,CD [1553] 
4010 DATA C8,90,21,00,BE,16,20,1E,7F,06 [1503] 

4020 DATA 10,CD,68,9E,79,CD,84,BB,32,4E [1800] 

4030 DATA A6,B7,CA,F3,9B,2A,43,A6,22,45 [1138] 

4040 DATA A6,3E,01,32,40,A6,CD,5E,96,3A [1730] 

4050 DATA 41,A6,B7,CA,DA,9B,CD,OA,98,CD [1355] 

4060 DATA Bc-, 9F , 3A, 53 , A6,47 , C5 , CD, 09 , BB [1699] 

4070 DATA DA,FD,9B,3A,3C,A6,67,2E,00,22 [1940] 

4080 DATA 4F,A6,CD,09,BB,DA,FD,9B,CD,00 [3299] 

4090 DATA 9C,B7,C2,CD,9B,E5,2E,00,22,34 [983] 

4100 DATA A6,7C,D6,10,32,42,A6,21,F5,A4 [865] 
4110 DATA CD,C8,90,El,CD,96,92,21,OE,A5 [1893] 

4120 DATA CD,C8,90,CD,81,BB,CD,06,BB,CB [1300] 

4130 DATA AF,CD,84,BB,CD,8F,91,FE,4E,28 [566] 

4140 DATA 44,FE,4A,20,E4,21,09,01,06,19 [2031] 


4150 DATA CD,48,9D,21,OB,01,06,14,CD,48 
4160 DATA 9D,3A,49,A6,3C,32,49,A6,CD,A4 
4170 DATA 94,CI,10,94,3A,44,A6,3C,32,44 
4180 DATA A6,FE,2A,DA,5A,9B,3D,32,44,A6 
4190 DATA 21,20,A5,CD,C8,90,CD,18,BB,AF 
4200 DATA 32,40,A6,CD,E3,97,C3,C8,91,CI 
4210 DATA 18,F3,21,00,10,11,00,BE,06,00 
4220 DATA 7E,4F,1A,B9,28,IC,23,D5,E5,58 
4230 DATA 16,00,B7,19,11,00,10,B7,ED,52 
4240 DATA ED,5B,4F,A6,B7,ED,52,El,Dl,38 
4250 DATA El,F6,01,C9,E5,23,13,04,3A,4E 
4260 DATA A6,B8,28,OF,7E,4F,1A,B9,28,Fl 
4270 DATA 11,00,BE,06,00,El,23,18,C5,El 
4280 DATA AF,C9,OE,07,21,FF,AB,11,00,A7 
4290 DATA CD,CE,BC,3E,02,CD,OE,BC,CD,4E 
4300 DATA BB,CD,00,B9,C3,64,CO,3A,41,A6 
4310 DATA B7,C8,CD,06,9F,CD,E3,97,C3,B8 
4320 DATA 9F,CD,3C,9D,21,84,A2,CD,C8,90 
4330 DATA 21,05,OF,DD,21,36,A6,E5,CD,75 
4340 DATA BB,DD,7E,00,CD,B3,91,DD,23,El 
4350 DATA 2C,7D,FE,08,38,ED,CD,06,BB,CB 
4360 DATA AF,FE,52,CC,B3,9C,FE,48,CC,BC 
4370 DATA 9C,FE,53,CC,C4,9C,FE,OD,28,02 
4380 DATA 18,E6,CD,B8,9F,CD,E3,97,C3,C8 
4390 DATA 91,DD,21,36,A6,3E,FF,C3,CA,9C 
4400 DATA DD,21,37,A6,AF,C3,CA,9C,DD,21 
4410 DATA 38,A6,3E,01,F5,DD,7E,00,3C,FE 
4420 DATA 1B,38,01,AF,DD,77,00,47,4F,Fl 
4430 DATA C5,F5,26,OF,C6,06,6F,CD,75,BB 
4440 DATA DD,7E,00,CD,B3,91,3E,20,CD,5A 
4450 DATA BB,Fl,CI,FE,FF,C2,32,BC,C3,38 
4460 DATA BC,CD,06,B9,3A,06,00,F5,CD,09 
4470 DATA B9,Fl,FE,80,28,22,21,OC,A6,FE 
4480 DATA 91,28,03,21,16,A6,DD,21,02 , A6 
4490 DATA 06,05,C5,DD,5E,00,DD,23,DD,56 
4500 DATA 00,DD,23,ED,AO,ED,AO,CI,10,EE 
4510 DATA 21,AF,9E,22,D4,BD,C9,CD,C6,95 
4520 DATA 3A,3E,A6,B7,C8,C3,35,98,3E,01 
4530 DATA CD,B4,BB,CD,6C,BB,AF,C3,B4,BB 
4540 DATA C5,CD,75,BB,C1,3E,20,CD,5A,BB 
4550 DATA 10,FB,C9,21,00,10,11,01,10,01 
4560 DATA FF,OF,36,E5,ED,BO,C9,CD,3C,9D 
4570 DATA 21,8A,AO,CD,C8,90,CD,B8,9F,CD 
4580 DATA 06,BB,CD,E3,97,CD,B8,9F,C3 ,C8 
4590 DATA 91,CD,3C,9D,3E,01,CD,B4,BB,ED 
4600 DATA 5B,43,A6,16,00,DF,23,A6,11,00 
4610 DATA 08,CD,9B,BC,CB,7F,20,1A,AF,CD 
4620 DATA B4,BB,CD,B8,9F,CD,18,BB,ED, 5B 
4630 DATA 43,A6,DF,23,A6,CD,CI,97,CD,E3 
4640 DATA 97,C3,C8,91,21,3A,A5,CD,C8,90 
4650 DATA 18,DE,CD,C9,9E,78,B7,CA,3E,9E 
4660 DATA 21,10,BE,11,00,08,CD,77,BC,D2 
4670 DATA 58,9E,C5,D5,F5,21,6A,A5,CD,C8 
4680 DATA 90,Fl,CD,B3,91,21,77,A5,CD,C8 
4690 DATA 90,El,CD,60,9E,21,85,A5,CD,C8 
4700 DATA 90,El,CD,60,9E,21,93,A5,CD,C8 
4710 DATA 90,2A,6F,A7,CD,60,9E,21,Al,A5 
4720 DATA CD,C8,90,3A,4F,BE,CD,B3,91,21 
4730 DATA BC,A5,CD,D2,90,3A,51,BE,CD, 9D 
4740 DATA 91,21,D7,A5,CD,C8,90,3A,12 ,A7 
4750 DATA CB,7F,28,05,21,EA,A5,18,03,21 
4760 DATA FO,A5,CD,C8,90,3A,13,A7,CB,7F 
4770 DATA 28,05,21,FC,A5,18,03,21,F6,A5 
4780 DATA CD,C8,90,CD,18,BB,CD,7A,BC,AF 
4790 DATA CD,B4,BB,ED,5B,43,A6,DF,23,A6 
4800 DATA CD,06,9F,CD,B8,9F,CD,E3,97,C3 
4810 DATA C8,91,21,C6,A5,CD,C8,90,18,DB 
4820 DATA 7C,CD,9D,91,7D,C3,9D,91,CD,09 
4830 DATA BB,38,FB,IC,OE,00,CD,81,BB,CD 
4840 DATA 06,BB,FE,OD,28,2F,FE,7F,20,15 
4850 DATA 79,B7,28,Fl,3E,08,CD,5A,BB,17 
4860 DATA CD,5Ä,BB,28,E6,OD,36,00,2B,18 
4870 DATA EO,BA,38,DD,BB,30,DA,D5,5F, 78 
4880 DATA B9,7B,Dl,28,D2,CD,5A,BB,77,23 
4890 DATA OC,18,CA,CD,84,BB,36,00,C9,E5 
4900 DATA CD,D3,12,EB,El,CD,64,OB,3A,90 
4910 DATA B2,4F,06,08,1A,A9,77,7C,CE,08 
4920 DATA 67,13,10,F6,C9,CD,3C,9D,3E,01 
4930 DATA CD,B4,BB,21,5C,A5,CD,C8,90,21 
4940 DATA 10,BE,06,OC,16,21,IE,7A,CD,68 
4950 DATA 9E,41,C9,3A,3F,A6,EE,01,32,3F 
4960 DATA A6,21,4B,AO,B7,CA,C8,90,21,3C 
4970 DATA AO,C3,C8,90,CD,Bl,9F,3A,3A,A6 
4980 DATA CD,15,9F,C3,B9,98,CD,Bl,9F,3A 
4990 DATA 39,A6,CD,15,9F,CD,AF,97,C3,B9 
5000 DATA 98,01,7E,FB,67,CD,A5,9F, 3A, 43 
5010 DATA A6,CD,A5,9F,3A,2A,A6,CD,A5,9F 
5020 DATA 3A,2B,A6,CD,A5,9F,3A,2C,A6,F5 
5030 DATA CD,A5,9F,3A,2D,A6,CD,A5,9F,Fl 
5040 DATA CD,A5,9F,3E,2A,CD,A5,9F,3E,FF 
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[1025] 

[1819] 

[1247] 

[1918] 

[1471] 

[1502] 

[2158] 

[1364] 
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[2079] 

[450] 

[1670] 
[1779] 
[1447] 
[1540] 
[1133] 
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[1409] 
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[1448] 
[1563] 
[1446] 
[2145] 
[2032] 
[2387] 
[920] 
[1545] 
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[1560] 
[2079] 
[1895] 
[1718] 
[2582] 
[1038] 
[1408] 
[801] 
[1828] 
[1433] 
[1754] 
[1552] 
[2103] 
[1618] 
[2223] 
[1831] 
[1411] 
[1318] 
[1203] 
[1662] 
[1027] 
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Programm 


5050 DATA CD,4P,9F,FB,C3,7A,9F,F3,CD,A5 [1216] 
5060 DATA 9F,CB,44,21,00,10,20,18,18,06 [1595] 

5070 DATA 0C,ED,78,77,OD,23,ED,78,F2,60 [1205] 

5080 DATA 9F,E6,20,20,Fl,C9,OC,7E,ED,79 [1019] 

5090 DATA OD,23,ED,78,F2,70,9F,E6,20,20 [2008] 

5100 DATA Fl,C9,21,4C,BE,ED,78,FE,CO,38 [2358] 

5110 DATA FA,OC,ED,78,0D,77,23,3E,05,3D [895] 

5120 DATA 20,FD,ED,78,E6,10,20,E9,3A,4C [1717] 

5130 DATA BE,E6,08,C2,F3,95,3A,4D,BE,E6 [1011] 

5140 DATA 02,C2,E3,95,C9,F5,ED,78,17,30 [1324] 

5150 DATA FB,F1,OC,ED,79,OD,C9,01,7E,FA [2089] 

5160 DATA 3E,01,ED,79,CD,09,BB,38,FB,C9 [1694] 

5170 DATA OE,01,53,45,43,54,4F,52,20,45 [1638] 

5180 DATA 44,49,54,4F,52,20,56,32,2E,36 [1187] 

5190 DATA 20,2D,20,57,72,69,74,74,65,6E [1899] 

5200 DATA 20,31,39,38,38,2F,31,39,38,39 [865] 

5210 DATA 20,62,79,20,4F,6C,69,76,65,72 [1091] 

5220 DATA 20,4D,61,79,65,72,18,00,01,14 [1619] 

5230 DATA 54,72,61,63,6B,20,20,20,20,20 [1828] 

5240 DATA 20,53,65,6B,74,6F,72,20,23,20 [2172] 

5250 DATA 20,20,20,50,61,67,65,20,23,20 [1426] 

5260 DATA 20,20,20,41,64,72,65,73,73,20 [1321] 

5270 DATA 23,20,20,20,20,00,30,14,18,20 [1359] 

5280 DATA 41,53,43,20,18,00,30,14,18,20 [1742] 

5290 DATA 48,45,58,20,18,00,ID,16,18,20 [1067] 

5300 DATA 53,6F,72,74,20,61,6E,20,18,20 [1061] 

5310 DATA 00,ID,16,18,20,53,6F,72,74,20 [1743] 

5320 DATA 61,75,73,20,18,00,29,16,18,20 [907] 

5330 DATA 4D,46,4D,20,18,00,29,16,18,20 [2388] 

5340 DATA 4D,46,20,18,00,37,14,18,20,41 [1732] 

5350 DATA 75,74,6F,20,61,6E,20,18,00,37 [1511] 

5360 DATA 14,18,20,41,75,74,6F,20,61,75 [1688] 

5370 DATA 73,20,18,00,01,03,4B,6F,6D,6D [1271] 

5380 DATA 61,6E,64,6F,6C,69,73,74,65,20 [1688] 

5390 DATA 28,5E,20,3D,20,43,54,52,4C,29 [1137] 

5400 DATA OA,OA,OD,5E,41,20,2E,2E,20,41 [1709] 

5410 DATA 75,74,6F,77,72,69,74,65,20,41 [1566] 

5420 DATA 4E,2F,41,55,53,20,20,20,20,20 [1489] 

5430 DATA 5E,42,20,2E,2E,2E,2E,2E,2E,2E [2179] 

5440 DATA 2E,20,53,65,6B,74,6F,72,20,53 [1607] 

5450 DATA 6F,72,74,20,20,20,20,20,5E,43 [1864] 

5460 DATA 20,2E,2E,2E,2E,2E,2E,2E,2E,2E [2290] 

5470 DATA 20,44,69,72,65,63,74,6F,72,79 [1804] 

5480 DATA OA,OD,5E,44,20,2E,2E,2E,2E,2E [1426] 

5490 DATA 2E,2E,2E,2E,20,44,72,69,76,65 [1738] 

5500 DATA 20,41,2F,42,20,20,20,20,20,5E [1883] 

5510 DATA 46,2Ö,2E,2E,2E,2E,2E,20,46,61 [1669] 

5520 DATA 72,62,65,6E,20,61,65,6E,64,65 [2217] 

5530 DATA 72,6E,20,20,20,20,20,5E,48,20 [1294] 

5540 DATA 2E,2E,2E,2E,2E,2E,2E,2E,20,46 [1683] 

5550 DATA 69,6C,65,20,49,6E,66,6F,73,OA [2307] 

5560 DATA OD,5E,49,20,2E,2E,2E,2E,2E,2E [1855] 

5570 DATA 20,53,65,6B,74,6F,72,20,49,6E [2082] 

5580 DATA 66,6F,73,20,20,20,20,20,5E,4B [955] 

5590 DATA 20,2E,2E,2E,2E,2E,2E,20,53,70 [1893] 

5600 DATA 75,72,20,6B,6F,70,69,65,72,65 [1607] 

5610 DATA 6E,20,20,20,20,20,5E,4E,20,2E [1918] 

5620 DATA 2E,2E,2E,20,6E,65,75,65,20,50 [1325] 

5630 DATA 61,72,61,6D,65,74,65,72,OA,OD [1597] 

5640 DATA 5E,50,20,2E,2E,2E,2E,2E,20,50 [2256] 

5650 DATA 61,67,65,20,77,65,63,68,73,65 [1369] 

5660 DATA 6C,6E,20,20,20,20,20,5E,51,20 [1960] 

5670 DATA 2E,2E,2E,20,42,79,74,65,66,6F [1611] 

5680 DATA 6C,67,65,20,53,75,63,68,65,6E [2085] 

5690 DATA 20,20,20,20,20,5E,52,20,2E,2E [1783] 

5700 DATA 2E,2E,20,72,65,2D,72,65,61,64 [1679] 

5710 DATA 20,53,65,6B,74,6F,72,0A,0D,5E [2000] 

5720 DATA 53,20,2E,2E,20,53,65,6B,74,6F [1732] 

5730 DATA 72,20,73,63,68,72,65,69,62,65 [1317] 

5740 DATA 6E,20,20,20,20,20,5E,56,20,2E [1834] 

5750 DATA 2E,20,53,65,6B,74,6F,72,20,61 [1603] 

5760 DATA 75,73,77,61,65,68,6C,65,6E,20 [1515] 

5770 DATA 20,20,20,20,5E,57,20,2E,2E,2E [2024] 

5780 DATA 2E,2E,2E,2E,2E,2E,20,48,45,58 [1661] 

5790 DATA 2F,41,53,43,49,49,OA,OA,OD,54 [1255] 

5800 DATA 61,73,74,65,20,64,72,75,65,63 [1449] 

5810 DATA 6B,65,6E,00,01,16,18,20,45,4E [1446] 

5820 DATA 54,45,52,20,66,75,65,72,20,4B [1781] 

5830 DATA 6F,6D,6D,61,6E,64,6F,6C,69,73 [1664] 

5840 DATA 74,65,20,18,OA,OA,OD,53,65,6B [1317] 

5850 DATA 74,6F,72,65,6E,00,43,14,07,07 [1110] 

5860 DATA 77,69,72,6B,6C,69,63,68,20,3F [1355] 

5870 DATA 00,43,14,44,72,69,76,65,20,00 [1801] 

5880 DATA 01,03,45,6E,74,73,70,72,65,63 [1671] 

5890 DATA 68,65,6E,64,65,20,54,61,73,74 [1073] 

5900 DATA 65,20,64,72,75,65,63,6B,65,6E [1819] 

5910 DATA 2E,OA,OA,OD,5B,52,5D,61,6E,64 [2029] 

5920 DATA 66,61,72,62,65,OA,OD,5B,48,5D [1536] 

5930 DATA 69,6E,74,65,72,67,72,75,6E,64 [1551] 

5940 DATA OA,OD,5B,53,5D,63,68,72,69,66 [1934] 

5950 DATA 74,OA,OA,OD,4D,69,74,20,45,4E [1764] 


5960 DATA 54,45,52,20,62,65,65,6E,64,65 [1841] 

5970 DATA 6E,00,01,19,44,72,69,76,65,20 [1845] 

5980 DATA 41,20,2C,20,44,69,73,6B,20,6E [1532] 

5990 DATA 69,63,68,74,20,65,69,6E,67,65 [2002] 

6000 DATA 6C,65,67,74,07,00,01,19,44,72 [1665] 

6010 DATA 69,76,65,20,41,20,2C,20,44,69 [1246] 

6020 DATA 73,6B,20,69,73,74,20,67,65,73 [1755] 

6030 DATA 63,68,75,65,74,7A,74,07,00,OB [1413] 

6040 DATA 18,2A,20,75,6E,66,6F,72,6D,61 [853] 

6050 DATA 74,69,65,72,74,20,2A,07,00,01 [1823] 

6060 DATA 03,18,20,53,65,6B,74,6F,72,20 [1346] 

6070 DATA 49,6E,66,6F,72,6D,61,74,69,6F [1418] 

6080 DATA 6E,65,6E,20,18,00,01,05,44,69 [2169] 

6090 DATA 65,20,53,70,75,72,20,69,73,74 [1778] 

6100 DATA 20,6E,69,63,68,74,20,66,6F,72 [1565] 

6110 DATA 6D,61,74,69,65,72,74,20,21,07 [1684] 

6120 DATA 00,01,05,53,65,6B,74,6F,72,65 [1632] 

6130 DATA 6E,20,70,72,6F,20,53,70,75,72 [1307] 

6140 DATA 20,3A,20,00,01,07,42,79,74,65 [2044] 

6150 DATA 73,20,70,72,6F,20,53,65,6B,74 [1573] 

6160 DATA 6F,72,20,20,3A,20,00,01,09,53 [1842] 

6170 DATA 65,69,74,65,6E, 20,70,72,6F, 20 [1523] 

6180 DATA 53,65,6B,74,6F,72,20,3A,20,00 [1254] 

6190 DATA 01,OB,42,79,74,65,73,20,70,72 [1699] 

6200 DATA 6F,20,53,70,75,72,20,3A,20,00 [1831] 

6210 DATA 01,OD,45,72,73,74,65,72,20,53 [1338] 

6220 DATA 65,6B,74,6F,72,20,3A,20,23,00 [2478] 

6230 DATA 30,16,49,44,3A,00,01,03,53,70 [1868] 

6240 DATA 75,72,20,6B,6F,70,69,65,72,65 [1607] 

6250 DATA 6E,20,28,6D,69,74,20,45,4E,54 [1672] 

6260 DATA 45,52,20,7A,75,72,75,65,63,6B [1586] 

6270 DATA 29,OA,OA,OD,07,5A,69,65,6C,6C [934] 

6280 DATA 61,75,66,77,65,72,6B,20,41,2F [1744] 

6290 DATA 42,20,3A,20,00,01,07,6C,65,73 [1705] 

6300 DATA 65,20,53,65,6B,74,6F,72,65,6E [1373] 

6310 DATA 2E,2E,00,01,05,5A,69,65,6C,73 [1760] 

6320 DATA 70,75,72,20,28,30,2D,34,31,29 [1889] 

6330 DATA 20,3A,20,07,00,01,07,49,44,27 [1307] 

6340 DATA 73,2'0,65,64,69,74,69,65,72,65 [1591] 

6350 DATA 6E,20,3F,20,00,53,70,75,72,6E [1728] 

6360 DATA 72,2E,20,23,00,OA,OD,4B,6F,70 [578] 

6370 DATA 66,6E,72,2E,20,23,00,OA,OD,53 [1363] 

6380 DATA 65,6B,74,6F,72,20,20,23,00,OA [2201] 

6390 DATA OD, 4C,61,65,6E,67,65,20,20,23 [1353] 

6400 DATA 00,20,3A,20,23,20,20,08,08,00 [1986] 

6410 DATA 01,07,73,63,68,72,65,69,62,65 [1447] 

6420 DATA 20,53,65,6B,74,6F,72,65,6E,2E [2018] 

6430 DATA 2E,00,01,03,18,20,53,75,63,68 [1271] 

6440 DATA 65,6E,20,76,6F,6E,20,42,79,74 [1764] 

6450 DATA 65,73,20,18,00,01,05,5B,41,5D [1637] 

6460 DATA 53,43,49,49,20,6F,64,65,72,20 [2150] 

6470 DATA 5B,48,5D,45,58,20,3A,20,00,01 [2148] 

6480 DATA 07,53,75,63,68,66,6F,6C,67,65 [1931] 

6490 DATA 20,28,31,36,20,42,79,74,65,73 [1626] 

6500 DATA 29,20,3A,20,00,01,09,42,79,74 [1803] 

6510 DATA 65,73,20,67,65,66,75,6E,64,65 [2001] 

6520 DATA 6E,20,61,6E,20,3A,20,23,07,00 [949] 

6530 DATA 01,OB,57,65,69,74,65,72 , 73,75 [2013] 

6540 DATA 63,68,65,6E,20,3F,20,00,01,09 [980] 

6550 DATA 42,79,74,65,73,20,6E,69,63,68 [1510] 

6560 DATA 74,20,67,65,66,75,6E,64,65,6E [1183] 

6570 DATA 20,21,07,00,01,03,07,OA,OD,4B [1287] 

6580 DATA 65,69,6E,65,20,44,69,72,65,63 [1065] 

6590 DATA 74,6F,72,79,20,76,6F,72,68,61 [2205] 

6600 DATA 6E,64,65,6E,20,21,21,00,01,01 [1818] 

6610 DATA 46,69,6C,65,6E,61,6D,65,20,3A [1270] 

6620 DATA 20,00,01,03,46,69,6C,65,74,79 [1658] 

6630 DATA 70,20,3A,20,00,01,05,41,6E,66 [1218] 

6640 DATA 61,6E,67,20,20,3A,20,23,00,01 [1377] 

6650 DATA 07,4C,61,65,6E,67,65,20,20,3A [2066] 

6660 DATA 20,23,00,01,09,53,74,61,72,74 [827] 

6670 DATA 20,20,20,3A,20,23,00,01,OB,44 [1527] 

6680 DATA 61,73,20,46,69,6C,65,20,73,74 [1245] 

6690 DATA 65,68,74,20,61,75,66,20,53,70 [1548] 

6700 DATA 75,72,20,00,20,53,65,6B,74,6F [1749] 

6710 DATA 72,20,23,00,01,03,07,40,65,73 [1666] 

6720 DATA 65,66,65,68,6C,65,72,20,21,07 [1558] 

6730 DATA 00,01,OE,46,69,6C,65,61,74,74 [1647] 

6740 DATA 72,69,62,75,74,65,20,3A,20,00 [1828] 

6750 DATA 11,OE,52,2F,4F,00,11,OE,52,2F [1645] 

6760 DATA 57,00,15,OE,44,49,52,00,15,OE [2075] 

6770 DATA 53,59,53,00,Bl,9E,B6,9E,B9,9E [1357] 

6780 DATA BA,91,5D,9C,D4,12,6A,OB,30,B7 [1409] 

6790 DATA 44,EF,58,CO,DO,12,66,OB,30,B7 [1939] 

6800 DATA 49,EF,58,CO,52,C6,07,63,C7,07 [1967] 

6810 DATA FF,FF,FF,FF,00,00,00,00,03,07 [1332] 

6820 DATA 03,39,00,10,00,10,00,00,1A,46 [1623] 

6830 DATA 45,4A,00,00,00,01,00,00,00,00 [1497] 

6840 DATA 00,00,00,00,00,00,00,00,00,00 [822] 

6850 DATA 08,00,00,00,00,00,00,00,00,00 [1317] 
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Bonus 


Land und Beute 

Flott erobert ist halb gewonnen 

Ein strategisches Gesellschaftsspiel mit allen Schikanen für den CPC-das 
ist diesmal unser Bonusprogram in auf der Databox-Diskette. “Strego” ist so 
komplex und grafisch aufwendig gestaltet, daß es jedem 16-Bit-Rechnerzur 
Ehre gereichen würde. 


Wir schreiben das Jahr 1732. Seit rund 
120 Jahren wütet der mörderische 
Krieg zwischen Ancalon und Evoria, 
den herrschenden Mächten auf den drei 
bewohnten Kontinenten des Planeten 
Strego. Der Kampf gegen das dunkle 
Königreich Evoria hat die Ressourcen 
von Ancalon fast erschöpft. In seiner 
Verzweiflung entschließt sich Anca- 
lons König Chanoc, seinen treuesten 
Gefolgsmann Fürst Aran Di-Arnac auf 
den noch unerschlossenen vierten Kon¬ 
tinent zu entsenden. Nach der notwen¬ 
digen Erschließung des Neulands soll 
dieser die Versorgung Ancalons sicher¬ 
stellen und damit die Niederlage ab¬ 
wenden. Binnen kurzem wird die Flotte 
des Reiches ausgerüstet. Hunderte von 
Siedlern gehen an Bord. Nach Wochen 
voller Plagen und Entbehrungen wirft 
ein Sturm die Schiffe schließlich an die 
Küste des vierten Kontinents. Unter der 
energischen Führung des Fürsten Di- 
Arnac leisten die wenigen Überleben¬ 
den nahezu Übermenschliches und er¬ 
richten innerhalb weniger Monate eine 
komplette Stadt in der Wildnis. Die er¬ 
sten Versorgungsgüter für das bedräng¬ 
te Ancalon stehen zur Einschiffung be¬ 
reit. 

Doch in der Nacht bricht das Unheil 
über die Siedler herein. Ein marker¬ 
schütterndes Donnern schreckt die we¬ 
nigen Wachen auf den Mauern der Stadt 
aus ihrer Lethargie. Zur Gegenwehr ist 
es bereits zu spät, als schwarz gepan¬ 
zerte Horden auf dunklen Pferden sich 
anschicken, durch die Tore zu brechen. 
Nur wenige Augenblicke vergehen, bis 
die gespenstische Armee beginnt, in 
den Straßen der Stadt zu wüten. Als 
schließlich der Fürst unter den Hieben 
eines schwarzgewandeten Ritters fällt, 
wird klar, daß die Schergen des Schal¬ 
tenkönigs von Evoria den vierten Kon¬ 
tinent betreten haben. Führungslos 
flieht der Rest der Siedler in die umlie¬ 
genden Wälder. 

Erst Tage später kehren sie in die ver¬ 
wüstete Stadt zurück. Die Chancen für 
einen erfolgreichen Abschluß des Un¬ 
ternehmens sinken auf den Nullpunkt, 


als die überlebenden Vertrauten des 
Fürsten beginnen, sich um die Nachfol¬ 
ge zu streiten. Jeder der Adligen schart 
eine Gruppe Anhänger um sich, und der 
Kampf um die Vormachtstellung auf 
dem vierten Kontinent entbrennt. Die 
Ziele für jeden der Edel leute sind klar: 
Nur der Beste wird überleben und das 
Königreich Ancalon zum Erfolg führen 
können. 

Gerissenheit siegt 

Vom Dunkel der Historie ins bunte 
Licht des CPC-Monitors: Jeder der 2 
bis 4 “Strego”-Spieler repräsentiert ei¬ 
nen der übriggebliebenen Adligen. Al¬ 
le Mittel sind erlaubt. Das Ziel eines je¬ 
den ist es, zum Nachfolger des einsti¬ 
gen Herren ernannt zu werden. Doch 
außer dem Fürstentitel ist noch ein 
Zweites wichtig: Es gilt, das Domizil 
der Schergen des Schattenkönigs auf 
diesem Kontinent ausfindig zu machen 
und den Schwarzen Ritter, den Helden 
und Mittelpunkt der finsteren Heere, zu 
vernichten. 

Das Programm wird mit dem Joystick 
gesteuert. Ein Farbmonitor ist sehr zu 
empfehlen: Gerade bei den Kampf¬ 
handlungen muß man die farblich ge¬ 
kennzeichneten Parteien gut voneinan¬ 
der unterscheiden können. 

Alle “Strego”-Spieler versuchen, mög¬ 
lichst viel aus ihrem jeweiligen An¬ 
fangskapital zu machen. Dazu ist es 
wichtig, daß man sein Vermögen stän¬ 
dig in Erwerbsgüter investiert oder aber 
Städte an legt, die durch Erheben von 
Steuern Geld einbringen. Je früher ein 
Spieler einen finanziellen Vorteil ge¬ 
genüber seinen Mitspielern erwirt¬ 
schaftet hat, desto größer ist seine Ge¬ 
winnchance. Wer erst einmal eine Stadt 
hat, kann Soldaten und Rittereinsetzen, 
um seine eigenen Erwerbsgüter zu 
schützen oder sich fremde anzueignen. 
Die Güter stel It man so auf, daß eine ef¬ 
fektive Verteidigung durch Ritter oder 
Soldaten gewährleistet ist. Auch der 
Stadtstandort will sorgfältig gewählt 
sein, damit die Wege zu eigenen und 


fremden Gütern möglichst kurz blei¬ 
ben. Die Soldaten und Ritter haben 
nämlich nur eine begrenzte Reichweite 
pro Runde. 

Gewonnen hat der Spieler, der 

1) als erster zum Fürsten wird oder 

2) als einziger übrigbleibt, wenn alle 
anderen Spieler ausscheiden. 

Jede Spielrunde beginnt damit, daß ei¬ 
ne Übersichtskarte zum begehrlichen 
Betrachten einlädt. Der anschließende 
Spielablauf gliedert sich in drei Phasen. 
Die Statusphase erlaubt es, an der 
Steuerschraube zu drehen; auch An¬ 
schaffungen werden hier gemacht, 
ln der Setzphase lassen sich die neuge¬ 
kauften Güter, Bauteile und Streitkräf- 
te ins Spiel bringen. 

Die Bewegungsphase schließlich ist 
das Wunschziel jedes potentiellen Er¬ 
oberers: Hier werden eventuell vorhan¬ 
dene Streitkräfte bewegt. Je nach 
Gelände kommen die Truppen mal 
schneller, mal langsamer voran. 

Damit der Spielablauf möglichst reiz¬ 
voll wird, gelten Bedingungen für den 
Einsatz der Reichtümer. So lassen sich 
etwa Slreitkrafte nicht nach Lust und 
Laune irgendwo in der Botanik aus dem 
Boden ziehen. Vielmehr braucht man 
zum Aufstellen von Truppen eine funk¬ 
tionierende Infrastruktur, sprich: eine 
vollständige Stadt. Städte sind natür¬ 
lich verletzlich - um sie zu schützen, 
lassen sich Mauern bauen. 

Diese kurze Beschreibung vermittelt 
bereits eine gewisse Vorstellung davon, 
wie komplex “Strego" ist und welchen 
Spielspaß es bringt. Der größte Teil des 
umfangreichen Programms ist in As¬ 
semblergeschrieben. Interessierte fin¬ 
den auf der Databox-Diskette neben 
Basic-Lader und BIN-Dateicn für 
Hauptprogramm, Grafik und Spielfeld 
auch den kompletten Asscmblerquell- 
text. Die ausführliche Spielanleitung 
befindet sich als Textdatei ebenfalls mit 

auf der Databox. 

(Matthias Fink/sz) 



Grafik vom Feinsten: das Lemprogramm für 
den kleinen Diktator 
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Programm 



Haste Töne? 


Noten und Akkorde lernen mit dem 
“Musik-Tutor” 

Interessieren Sie sich fürMusik? Auf einem Instrument zu musizieren ist gar 
nicht so schwer. Lassen Sie sich von Ihrem CPC beim Umgang mit Noten und 
Klaviatur unterstützen. 


Der “Musik-Tutor” ist eine Art pro¬ 
grammierte Lernhilfe für Noten und 
Akkorde. Natürlich will er keine or¬ 
dentliche musikalische Ausbildung er¬ 
setzen. Vielmehr soll das Programm ei¬ 
ne Anregung dazu geben, sich einmal 
etwas näher mit der Musik zu beschäfti¬ 
gen. Also bitte jetzt nicht gleich den 
Klavierlehrer davonjagen und mit der 
vorhandenen Musikliteratur eine 
Bücherverbrennung inszenieren. 
Außerdem ist das CPC-Programm im 
Gegensatz zu einem menschlichen 
N achhi Ifelehrer taub und stumm. 
Dennoch kann mit dem "Musik-Tutor" 
jeder, der schon ein wenig von den No¬ 
ten und der Notenschrift weiß: 
-Klaviaturen verstehen lernen 
-Noten lesen lernen 
-Gesangsübungen durchführen 
-Akkorderkennung üben 
-Akkordgriffe einstudieren oder 
-Tonarten bestimmen. 

Nach dem Ladevorgang und einer kur¬ 
zen Einblendung des Copyright-Ver¬ 
merks erscheint der Arbeitsbildschirm 
des Programms. Er bleibt mit seinen 


Ausgabefenstern und seinem Fünf- 
Punkte - M e n ü ständig sichtbar. In den 
unteren Bildschirmzeilen gibt das Pro¬ 
gramm Hinweise zur Bedienung des je¬ 
weiligen Programmabschnitts aus. 

Der CPC als Lehrer 

Das Programmenü besteht aus fünf 
Punkten. Bei Punkt 1 hat man die 
Möglichkeit, die Tonausgabe, die beim 
Start des Programms ertönt, ein- oder 
auszuschalten. Unter Punkt 2 wird es 
ernst. Hier wird, wenn man die Taste 
<J> drückt, eine fünl'-oktavige Klavia¬ 
tur dargestellt. Mit den Pfeiltasten läßt 
sich ein Cursor unter dem Tastenfeld 
hin- und herbewegen. Durch Druck auf 
<COPY> erfährt man dann, welcher 
Ton auf der entsprechenden Taste liegt. 
Wählt man die Darstellung in Noten¬ 
schrift, so hat man zusätzlich die Gele¬ 
genheit, sich die Töne mit der Pfeiltaste 
<Auf> anzuhören oder den Kammerton 
a’ mit der Pfeiltaste <Ab> ausgeben zu 
lassen. Unter Menüpunkt A werden 
rein zufällig ausgewählte Noten zur 


Übung dargestellt. Aber vorerst muß 
man sicherst einmal für den zu verwen¬ 
denden Schlüssel entscheiden. Dieser 
legt fest, welche Linie jeweils welchen 
Ton bezeichnen soll. Die Abbildung 
zum Text verdeutlicht, welche Schlüs¬ 
sel für welche Stimmlagen gebräuch¬ 
lich sind. Am häufigsten werden Vio- 
Iin- und Baßschlüssel verwendet. Das 
Programm beschränkt sich auf diese 
beiden, da sie für Anfänger zur Übung 
ausreichen. 

Viele Schlüssel und doch 
kein Schloß 

Bleibt noch Punkt B zu nennen. Seine 
Anwahl veranlaßt den CPC, eine Ton¬ 
leiter auszugeben. Mil Hilfe dieser 
Tonleiter kann man zum Beispiel Ge¬ 
sangsübungen durchführen. Man läßt 
sich zunächst durch den Druck auf die 
Pfeiltaste <Ab> den Kammerton a’ als 
Orientierungshilfe Vorspielen, fährt 
dann mit dem Cursor unter eine beliebi¬ 
ge Note und versucht, den entsprechen¬ 
den Ton zu singen, bevor man sich 
durch Druck auf die Pfeiltaste <Auf> 
den richtigen Ton vom Rechner melden 
läßt. 

Akkorde lassen sich nach bestimmten 
Regeln aus Tönen verschiedener Höhe 
zusammensetzen. Jeder Akkord be¬ 
steht aus mindestens drei Tönen. Sol¬ 
che Dreiklang-Akkorde stehen unter 
Punkt 3 des Menüs zur Auswahl. Man 
entscheidet zunächst wieder über eine 
Notenausgabe im Violin- oder Baß¬ 
schlüssel. Wählt man dann den Punkt A 
an, gibt der CPC eine zufällige Folge 
von dreistimmigen Akkorden (C, Dm, 
Em, F, G, Am und H - oder englisch B -) 
aus. Wieder hat man die Möglichkeit, 
mit dem Cursor unter die einzelnen Ak¬ 
korde zu fahren und sich durch Druck 
auf <COPY> die korrekte Akkordbe¬ 
zeichnung nennen zu lassen. Der Druck 
auf <DEL> bringt eine neue Zufallsfol- 
ge von Dreiklängen auf den Bild¬ 
schirm. 

Wählt man Punkt B an, so erscheint 
nach kurzer Zeit der Ausschnitt aus ei¬ 
ner Klaviatur im Ausgabefenster. Eine 
der Tasten enthält den Buchstaben c zur 
Kennzeichnung. Das bedeutet, daß man 
sich hier in der Kleinen Oktave einer 
Klaviertastatur befindet und unter der 
bezeichneten Taste der Ton c liegt. 
Durch Bedienung der Pfeiltasten 
<Links>/<Rechts> kann man nun im 
kleinen Ausgabefenster einige Begleit¬ 
akkorde für die linke Spielhand anzei- 
gen lassen. (Solche Akkorde sind bei- 
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Violinschlüssel 

.. 

Sopranschlüssel 

Alt-Schlüssel 


E • - 

M— 


Tenor-Schlüssel Baß-Schlüssel 

N1N— ■ - 


Die Notenschlüssel für die verschiedenen Stimmlagen 


spielsweise geeignet, um ein Keyboard 
mit Begleitautomatik zu spielen.) Ein 
Tastendruck auf <COPY> läßt den CPC 
den gewählten Akkord auf der Klavia¬ 
tur darstellen. Die Zahlen eins bis fünf 
geben dabei die Lage der notwendigen 
Töne auf der Tastatur an und nennen 
einen möglichen Fingersatz (^Dau¬ 
men, 2=Zeigefinger, 3=Miltelfinger, 
4=Ringfinger,5=kleiner Finger). 

Ein Akkord, aber viele 
Finger 

Wichtig ist noch, daß im großen Anzei¬ 
gefenster oben links immer der als Fin¬ 
gersatz dargestellte Akkord (teilweise 
abgekürzt) benannt wird. Dadurch ist 
ein schnelleres “Blättern” im kleinen 
Ausgabefenster möglich. Der richtige 
Akkord wird nur dann angezeigt, wenn 
die Bezeichnungen im kleinen wie im 
großen Ausgabefenster (links oben) 
übereinstimmen! Die dargestellten Ak¬ 
kordereichenaus, um eine Vielzahl von 
Musikstücken in allen Tonarten spielen 
zu können und dürften für den Anfang 
wohl genügen. 

Vordem letzten Menüpunkt, der ledig¬ 
lich das “Musik-Tutor”-Programm be¬ 
endet und das BASIC-Programm aufli¬ 
stet, kommen wir noch zum Punkt 4 
des Menüs. Es besteht wieder die Mög¬ 
lichkeit,die Zeichenausgabe im Violin- 
oder Baßschlüssel festzulegen. Danach 
gibt der CPC einige Vorzeichen-Notie¬ 


rungen aus. Ein Kreuz (#) erhöht eine 
nachfolgende Note um einen halben 
Ton, und ein b erniedrigt die folgende 
Note um den gleichen Betrag. Musiker 
bezeichnen die Zeichen als “Verset¬ 
zungszeichen”. Stehen diese am An¬ 
fang eines Notensystems, so gelten sie 
jeweils f ü r d ie ges am te Zc i I e. 

Mit den Pfeiltasten <Links>/<Rechts> 
kann man nun, wie gewohnt, die Vor¬ 
zeichengruppen anfahren. Durch einen 


Tastendruck auf <COPY> erfährt man, 
wie die entsprechende Tonart heißt. 

Der “Musik-Tutor” soll ein Werkzeug 
für Anfänger darstellen. Fr erhebt nicht 
den Anspruch auf Vollständigkeit. Dies 
wäre aufgrund des riesigen Detail¬ 
reichtums der Musik auch nur mit 
großem Aufwand zu realisieren. 

Wir wünschen viel Spaß beim Lernen 
mit CPC und “Musik-Tutor”! 

Mathias Kroll/jg 


1000 REM ****************************** 
1010 REM ********* MUSIK-TUTOR ******** 
1020 REM *** fuer 464,664 und 6128 *** 
1030 REM *** (c) 1991 MATHIAS KROLL *** 
1040 REM *** & CPC International ***** 

1050 REM ****************************** 
1060 MODE 1:BORDER 0:INK 0,0:INK 1,0:INK 2 
,0:INK 3,0 

1070 FOR i=l TO 2000:NEXT:LOCATE 11,11:PEN 
1:PRINT " 1991 Mathias Kroll"; 

1080 INK 1,13 

1090 REM *** Daten ******************** 
1100 DATA 228,233,238,243,248,253,258,263, 
268,273,278,283,288,293,298,303,308,313,31 
8,323,328,333,338,343 

1110 DATA C,CIS/DES,D,DIS/ES,E,F,FIS/GES,G 
,GIS/AS,A,AIS/B,H,c,cis/des,d,dis/es,e,f,f 
is/ges,g,gis/as,a,ais/b,h,c',eis'/des',d', 
dis ' /es' , e' ,f' ,fis'/ges' ,g' ,gis'/as' ,a' ,ai 
s'/b',h' 

1120 DATA c' ' ,cis"/des" ,d" ,dis' '/es" ,e 
" ,f'' , fis' '/ges'' ,g'' ,gis' '/as",a" ,ais' 
'/b' ' ,h" ,c' " ,cis'' '/des' " ,d" ' ,dis" '/e 
s" ' ,e" ' ,f' " ,fis" '/ges' " ,g' " ,gis'' '/a 

• t f t * * . * ‘ * 


[1365] 

[1641] 

[1497] 

[947] 

[2040] 

[1365] 

[3365] 

[3811] 

[65] 

[1674] 

[4276] 


[9273] 


[8983] 


,ais'"/b'",h'",c"" 


1130 DATA a,h,c',d',e',f',q',a',h',c",d" [5447] 
,e",f",g",a",h",c'",d'",e'",f'",g 
''' ,a''',h''',c'''' 

1140 DATA C,D,E,F,G,A,H,C,d,e,f,g,a,h,c',d [1922] 
',e',f' 

UBo'däTA 0,0,2,0,0,0,0,0,0,0,0,2,0,0,0,0, [2471] 

0 , 0 , 1 , 1,0 

1160 DATA 258,258,268,263,263,273,268,268, [3676] 

278,273,273,283,278,278,288,283,283,293,28 

8,288,298 


1170 DATA 0,2,0,1,0,1,1,0,1,0,2,0,0,2,0,1, [2087] 

0,1,1,0,1 

1180 DATA 248,248,248,253,253,253,258,258, [3660] 

258,263,263,263,268,268,268,273,273,273,27 

8,278,278 

1190 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, [2728] 

0 , 0 , 0 , 0,0 

1200 DATA 238,238,238,243,243,243,248,248, [4382] 
248,253,253,253,258,258,258,263,263,263,26 
8,268,268 

1210 DATA C,Cm,C7,D,Dm,D7,E,Em,E7,F,Fm,F7, [4005] 
G,Gm,G7,A,Am,A7,B,Bm,B7 

1220 DATA 80,192,304,410,528 [431] 

1230 DATA G-Dur/e-moll,D-Dur/h-moll,A-Dur/ [12556] 
fis-moll,E-Dur/cis-mol1,H-Dur/gis-moll,Fis 
-Dur/dis-moll,F-Dur/d-moll,B-Dur/g-moll,Es 
-Dur/c-moll,As-Dur/f-moll,Des-Dur/b-moll 
1240 DATA 568,506,478,426,379,358,319,284, [4751] 
253,239,213,190,179,159,142,127,119,106,95 
,89,80,71,63,60 

1250 DATA 1911,1703,1517,1432,1276,1136,10 [4601] 
12,956,851,758,716,638,568,506,478,426,379 
, 358 

1260 DATA C,Cm,C7,C#/Db,C#m/Dbm,C#7/Db7,D, [10958] 
Dm, D7 , D#/Eb,D#m/Ebm,D#7/Eb7 ,E,Em, E7, F, Fra, F 
7 ,F#/Gb,F#m/Gbm,F#7/Gb7,G,Gra,G7,G#/Ab,G#m/ 
Abm,G#7/Ab7,A,Am,A7,A#/Bb,A#m/Bbm,A#7/Bb7, 

B,Bm,B7 

1270 DATA 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, [3424] 
1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1,1 
1280 DATA 428,412,428,460,428,460,396,396, [6543] 
396,492,476,492,428,428,428,460,460,460,38 
0,380,428,396,396,460,412,412,476,428,428, 
492,460,460,508,412,396,412 
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1290 DATA 200,296,200,200,200,200,200,200, [8193] 
200,200,296,200,200,200,200,200,200,200,29 
6,296,200,200,200,200,296,296,296,200,200, 
200,200,200,296,296,200,296 

1300 DATA 2,2,2,2,2,2,0,0,2,2,2,2,0,0,2,2, [3948] 
2,2,0,0,0,0,0,0,2,2,2,2,2,2,2,2,2,2,2,2, 

1310 DATA 364,364,364,380,380,380,0,0,364, [5872] 

412,412,412,0,0,396,364,364,412,0,0,0,0,0, 

0,364,332,364,380,364,380,396,380,396,332, 

332,332 

1320 DATA 200,200,200,296,296,296,0,0,200, [6506] 

296,296,296,0,0,200,200,200,296,0,0,0,0,0, 

0,200,200,200,296,200,296,200,296,200,200, 

200,200 

1330 DATA 0,0,3,0,0,3,3,3,0,0,0,3,3,3,0,0, [3192] 

0,0,3,3,3,3,3,3,0,0,0,0,0,0,0,0,0,0,0,3 

1340 DATA 0,0,316,0,0,332,300,300,0,0,0,38 [4819] 

0,332,332,0,0,0,0,316,300,316,332,316,332, 

0,0,0,0,0,0,0,0,0,0,0,300 

1350 DATA 0,0,296,0,0,200,200,200,0,0,0,29 [4684] 

6,200,200,0,0,0,0,296,200,296,200,296,200, 

0,0,0,0,0,0,0,0,0,0,0,200 

1360 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,4, [4399] 

4,0,0,0,0,0,0,0,4,4,4,4,4,4,4,4,4,0,0,0 

1370 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,30 [5305] 

0,284,0,0,0,0,0,0,0,284,284,284,300,300,30 

0,316,316,316,0,0,0 

1380 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,20 [5410] 

0,296,0,0,0,0,0,0,0,296,296,296,200,200,20 

0,296,296,296,0,0,0 

1390 DATA 5,5,0,5,5,0,5,5,5,5,5,0,5,5,5,0, [3406] 

0,5,5,5,5,5,5,5,0,0,0,0,0,0,0,0,0,5,5,0 

1400 DATA 268,268,0,284,284,0,252,236,252, [6309] 

316,316,0,284,268,284,0,0,300,252,252,252, 

268,268,268,0,0,0,0,0,0,0,0,0,252,252,0 

1410 DATA 200,200,0,296,296,0,296,200,296, [5870] 

296,296,0,296,200,296,0,0,200,296,296,296, 

200,200,200,0,0,0,0,0,0,0,0,0,296,296,0 

1460 REM *** Felder dimensionieren und [4711] 

Daten einiesen ************************* 

1470 DEFINT a-Z [553] 

1480 ai=21:DIM sy(24),bsl$(24),bs2$(24),gb [9847] 
k$ ( 62 ),gbs$( 18 ),syal(ai),vl(ai),sya 2 (ai),v 
2(ai),sya3(ai),v3(ai),bs3$(ai),sx(5),bs4$( 

11),thv(24),thb(18),gth(l8) 

1490 fi=36:DIM ab$ (f X) ,f 1( fi),fix(fi),fly { [6817] 
fi),f2(fi),f2x(fi),f2y(fi),f3(fi),f3x(fi), 
f3y(fi),f4(fi),f4x(fi),f4y(fi),f5(fi),f5x( 
fi),f5y{fi),lx(5),ly(5) 

1500 si=6: 
p4$(si) 

1510 REST( 

: NEXT 
1520 RESTC 
i) :NEXT 
1530 RESTC 
i):NEXT 
1540 RESTC 
i):NEXT 
1550 RESTC 
i) :NEXT 
1560 RESTC 
: NEXT 

1570 RESTC 
i):NEXT 
1580 RESTC 
: NEXT 

1590 RESTC 
i):NEXT 
1600 RESTC 
: NEXT 
1610 RESTC 
i):NEXT 
1620 RESTC 
NEXT 

1630 RESTC 
i):NEXT 
1640 RESTC 
):NEXT 
1650 RESTC 
):NEXT 
1660 RESTC 
):NEXT 
1670 RESTC 
: NEXT 
1680 RESTC 
):NEXT 
1690 RESTC 
):NEXT 


1100:FOR 

i=l 

TO 

24:READ 

sy(i) 

[2810] 

1110:FOR 

i=l 

TO 

61:READ 

gbk$( 

[2181] 

1130:FOR 

i=l 

TO 

24:READ 

bsl$ ( 

[4872] 

1140:FOR 

i=l 

TO 

18:READ 

bs2$( 

[2010] 

1160:FOR 

i=l 

TO 

ai:READ 

syal ( 

[2257] 

1150:FOR 

i=l 

TO 

ai:READ 

vl(i) 

[2528] 

1180:FOR 

i=l 

TO 

ai:READ 

sya2( 

[2627] 

1170:FOR 

i=l 

TO 

ai:READ 

v2(i) 

[2806] 

1200:FOR 

i=l 

TO 

ai:READ 

sya3 ( 

[2089] 

1190:FOR 

i=l 

TO 

ai:READ 

v3 (i) 

[2952] 

1210:FOR 

i=l 

TO 

ai:READ 

bs3$ ( 

[3474] 

1220:FOR 

i=l 

TO 

5:READ sx(i): 

[1699] 

1230:FOR 

i=i 

TO 

11:READ 

bs4S ( 

[1431] 

1240:FOR 

i=l 

TO 

24:READ 

thv(i 

[2375] 

1250:FOR 

i=l 

TO 

18:READ 

thb(i 

[2279] 

1260:FOR 

i=l 

TO 

fi:READ 

abS (i 

[2994] 

1270:FOR 

i=i 

TO 

fi:READ 

fl(i) 

[3656] 

1280:FOR 

i=l 

TO 

fi:READ 

flx(i 

[3050] 

1290:FOR 

i=l 

TO 

fi:READ 

fiy (i 

[3754] 


1700 RESTORE 1300:FOR i=l TO filREAD f2(i) 

: NEXT 

1710 RESTORE 1310:FOR i=l TO filREAD f2x(i 
):NEXT 

1720 RESTORE 1320:FOR i=l TO fi:READ f2y(i 
):NEXT 

1730 RESTORE 1330:FOR i=l TO fi:READ f3(i) 

: NEXT 

1740 RESTORE 1340:FOR i=l TO fi:READ f3x(i 
):NEXT 

1750 RESTORE 1350:FOR i = l TO fi:READ f3y(i 
):NEXT:INK 1,0 

1760 RESTORE 1360:FOR i=l TO fi:READ f4(i) 

: NEXT 

1770 RESTORE 1370:FOR i=l TO fi:READ f4x(i 
):NEXT 

1780 RESTORE 1380:FOR i=l TO fi:READ f4y(i 
):NEXT 

1790 RESTORE 1390:FOR i=l TO fi:READ f5(i) 

: NEXT 

1800 RESTORE 1400:FOR i=l TO fi:READ f5x(i 
):NEXT 

1810 RESTORE 1410:FOR i=l TO fi:READ f5y(i 
):NEXT 

1860 REM ***Variable,Farben,Titel,Fenster, 
Start *** 

1870 n=15:f=14:h=l:ha=2:he=12:1=5:z=l:a=7: 
aus=0:aw5=25:aw6=l:spr=0 

1880 ti$="************** MUSIK-TUTOR ***** 

********* I 

1890 MODE 1:INK 0,0:INK 1,0:INK 2,0:INK 3, 
0:BORDER 0 

1900 LOCATE 1,2:PEN 1:PRINT ti$; 

1910 WINDOW #1,1,40,4,14:PEN #1,2:PAPER #1 
,1:CLS #1 

1920 WINDOW #2,1,40,18,22:PEN #2,1:PAPER # 
2 0:CLS #2 

1930 WINDOW #3,1,40,24,25:PEN #3,2:PAPER # 
3,0 

1940 WINDOW #4,13,28,16,16:PEN #4,2:PAPER 
#4,l:CLS #4 

1950 WINDOW #5,24,40,23,23:PEN #5,2:PAPER 
#5,0 

1960 GOSUB 2010:GOSUB 2090:GOSUB 2270:GOSU 
B 2600 

1970 INK 0,3:INK 1,13:INK 2,0:BORDER 3:AFT 
ER 25,3 GOSUB 4600:WI1ILE INKEY$<>"" :WEND:G 
OTO 2330 

1980 REM *** Teilloeschung (window #1)* 
1990 WINDOW #1,4,40,4,14:CLS #1:CLS #4:WIN 
DOW #1,1,40,4,14:RETURN 
2000 REM *** Menue zeichnen *********** 
2010 LOCATE #2,1,1:PEN #2,1:PRINT #2,"1 S 
top Bitte waehlen"; 

2020 LOCATE #2,1,2:PRINT #2,"2 Noten"; 

20 3 0 LOCATE #2,1,3:PRINT #2, "3 Akkorde"; 
2040 LOCATE #2,1,4:PRINT #2,"4 Vorzeichen 

TI . 

2050 LOCATE #2,1,5:PRINT #2,"5 Programmen 
de"; 

2060 RETURN 

2070 REM *** Anzeigentexte ************ 
2080 CLS #5:PRINT #5,"DEL = Neue Wahl";:RE 
TURN 

2090 CLS #3:LOCATE #3 f 1,1:PEN #3,2:PRINT # 
3, "SPACE = Ton e.tn/aus "; 

2100 RETURN 

2110 LOCATE #3,22,ze:PEN #3,1:PRINT #3,"au 
s";:PEN #3,2:LOCATE #3,18,ze:PRINT #3,"ein 
";:RETURN 

2120 LOCATE #3,22,ze:PEN #3,2:PRINT #3,"au 
S " : PEN #3,1: LOCATE #3,18 ,ze: PRINT #3,"ein 
";:PEN #3,2:RETURN 

2130 CLS #3:PRINT #3,"Noten auf der Klavia 
tur (j/n) ?";:RETURN 

2140 CLS #3:PRINT #3,"Noten im Violinschlu 
essel (j/n) ?";:RETURN 

2150 CLS #3:PRINT #3,"Vorzeichen im Violin 
schluessel (j/n) ?";:RETURN 
2160 CLS #3:PRINT #3,"PFEILE(1./r.)= Curso 
r COPY= Bezeichnung";:RETURN 
2170 CLS #3:PRINT #3,"PFEILE(1. / r •) = Curso 
r";:LOCATE #3,1,2:PRINT #3,"COPY 
Bezeichnung";:RETURN 

2180 LOCATE #3,1,2:PRINT #3,"PFEILE(o./u.) 

= Akt.Ton/Kammerton a'";:RETURN 

2190 LOCATE #3,1,2:PRINT #3,"PFEIL(U.) 

= Kammerton a'";:RETURN 

2200 CLS ff3:PRINT #3,"A Zufallsnoten fuer 
Lese-Uebung"; 


[2825] 

[2244] 

[2424] 

[2821] 

[2880] 

[3076] 

[2090] 

[2292] 

[2508] 

[3252] 

[2144] 

[3233] 

[1891] 

[4025] 

[2740] 

[4361] 

[1492] 

[2595] 

[3056] 

[2506] 

[3188] 

[2803] 

[1682] 

[7012] 

[1141] 

[4383] 

[2077] 

[3650] 

[2959] 

[2085] 

[2813] 

[3729] 

[555] 

[1791] 

[3203] 

[4698] 

[555] 

[3823] 

[5566] 

[3449] 

[3694] 

[5078] 

[4905] 

[7206] 

[4725] 

[3775] 

[2941] 
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2210 LOCATE #3,1,2:PRINT #3,”B Tonleiter [4306] 
fuer Gesangs-Uebung"RETURN 

2220 CLS #3:PRINT #3,"A Akkordnoten (C-D- [3060] 
E-F-G-A-B) 

2230 LOCATE #3,1,2:PRINT #3,"B Akkordgriff [3780] 
e (Alle Tonarten)";:RETURN 

2240 CLS H 3:PRINT #3,"PFEILE(1./r.)= Akkor [4145] 
dnamen aufrufen"; 

2250 LOCATE #3,1,2:PRINT ff3,"COPY [6114] 

= Fingersatz anzeigen";:RETURN 

2260 REM *** Gewaehlte Menue-Nununer [4107] 

farblich hervorheben *** 

2270 LOCATE #2,1,1:PEN #2,2:PRINT #2,"1";: [3890] 
RETURN 

2280 LOCATE #2,1,2:PEN #2,2:PRINT #2,"2";: [3906] 
RETURN 

2290 LOCATE #2,1,3:PEN #2,2:PRINT #2,"3";: [2143] 
RETURN 

2300 LOCATE #2,1,4:PEN #2,2:PRINT #2,"4";: [3173] 
RETURN 

2310 LOCATE #2,1,5:PEN #2,2:PRINT #2,"5";: [2323] 
RETURN 

2320 REM *** Tastatur-Hauptabfrage **** [1715] 

2330 a$=INKEY$:IF a$="" THEN 2330 [1502] 

2340 IF a$=CHR$(243) THEN GOSUB 2660:GOTO [25071 

2330 

2350 IF a$=CHR$(242) THEN GOSUB 2800:GOTO [13991 

2330 

2360 IF a$=CHR$(241) AND VZ=2 THEN SOUND 1 [3637] 
,284,50,5:GOTO 2330 

2370 IF a$=CHR$(240) AND vz=2 THEN SOUND 1 [1659] 
,gth(gb),50,5:GOTO 2330 

2380 IF a$=CHR$(224) AND VZ=22 THEN CLS #4 [5346] 
:PRINT #4,gbk$(gb);:GOTO 2330 

2390 IF a$=CHR$(224) AND vz=33 THEN GOSUB [3165] 
3400:GOTO 2330 

2400 IF a$=CHR$(224) THEN CLS #4:PRINT #4, [3098] 
gbs$(gb);:GOTO 2330 

2410 IF a$=CHR$(127) AND w=2 THEN GOSUB 19 [4530] 
90:GOSUB 3550:GOSUB 3580:gz=25:v=l:GOSUB 3 
320:GOTO 2330 

2420 IF a$=CHR$(127) AND W=22 THEN GOSUB 1 [4713] 
990:GOSUB 3550:GOSUB 3610:gz=19:v=0:GOSUB 
3320:GOTO 2330 

2430 IF a$=CHR$(127) AND W=3 THEN GOSUB 19 [5295] 
90:r=6:gr=6:GOSUB 3550:GOSUB 3580:gb=l:GOS 
UB 3380:GOTO 2330 

2440 IF a$=CHR$(127) AND W=33 THEN GOSUB 1 [4370] 
990:r=6:gr=6:GOSUB 3550:GOSUB 3610:gb=l:GO 
SUB 3380:GOTO 2330 

2450 IF a$=CHR$(127) AND W=4 THEN GOSUB 19 [3603] 
90:r=5:gr=5:gb=l:GOSUB 3550:GOSUB 3580:GOS 
UB 3530:GOTO 2330 

2460 IF a$=CHR$ (12 7) AND W=44 THEN GOSUB 1 [6180] 
990:r=5:gr=5:gb=l:GOSUB 3550:GOSUB 3610:GO 
SUB 3530:GOTO 2330 

2470 IF aus=0 THEN 2480 ELSE 2500 [1310] 

2480 IF a$=" " AND 1 = 5 THEN 1=0:GOSUB 2600 [5267] 
ELSE IF a$=" " AND 1=0 THEN l=5:GOSUB 260 

0 

2490 IF a$=CHR$(13) AND spr=l THEN spr=0:l [5193] 

=5:GOSUB 2600:CLS #1 ELSE IF a$=CHR$(13) A 

ND spr=0 THEN spr=l:1=0:GOSUB 2600:CLS #1 

2500 IF a$<"l" OR a$>"5" THEN 2330 [2303] 

2510 IF a$="l" THEN aus=0:r=0:w=0:GOSUB 20 [9016] 

10:GOSUB 2270:GOSUB 2090:GOSUB 2600:vz=l:n 

=15:f=14:h=l:ha=2:he=12:ta=0:aw5=25:GOSUB 

4600: CLS #1:CLS #4: CLS #5:GOTO 2530 

2520 q=0:TAG:MOVE 0,650:PRINT REMAIN (2):T [4874] 

AGOFF:LOCATE 1,2:PEN 1:PRINT ti$; 

2530 IF a$="2" THEN aus=l:w=0:GOSUB 2010:G [7242] 
OSUB 2280:vz=2:r=5:gr=5:ra=2:era=37:gb=l:g 
be=l:gba=17:CLS #4:CLS #5:GOTO 2960 
2540 IF a$="3" THEN aus=l:w=0:CLS #1:GOSUB [5992] 
2010:GOSUB 2290:vz=3:r=6:gr=6:ra=4:era=38 
:gb=l:gbe=l:gba=9:CLS #4:CLS #5:GOTO 3140 
2550 IF a$="4" THEN aus=l:w=0:GOSUB 2010:G [6592] 
OSUB 2300:vz=4:r=5:gr=5:ra=7:era=33:gb=l:g 
be=l:gba=5:CLS #4:CLS #5:GOTO 3260 
2560 IF a$="5" THEN aus=0:w=0:GOSUB 2010:G [6538] 
OSUB 2310:FOR i=l TO 500:NEXT:MODE 2:INK 0 
,13:INK 1,0:PEN 1:PAPER 0:LIST:END 
2570 n=15:f=14:h=l:ha=2:he=12:CLS #1:GOSUB [2733] 


4600 

2580 GOTO 2330 [345] 

2590 REM *** Anzeige Ton (ein/aus) **** [1634] 

2600 IF 1=0 THEN ze=l:GOSUB 2110 [1834] 

2610 IF 1=5 THEN ze=l:GOSUB 2120 [1374] 

2640 RETURN [555] 

2650 REM *** Textcursor nach rechts *** [1935] 


2660 IF r=0 THEN RETURN [1370] 

2670 IF vz=22 THEN 2740 [899] 

2680 IF vz<>33 THEN LOCATE #1,r,10:PRINT # [3762] 
1," ";:CLS #4 

2690 r=r+ra:IF r>era THEN r=gr [1479] 

2700 gb=gb+l:IF gb>gba THEN gb=gbe [1036] 

2710 IF VZ=33 THEN CLS #4:PRINT #4,ab$(qb) [30661 
;:RETURN 

2720 LOCATE #1,r,10:PRINT #1,CHR$(244);:RE [28761 
TURN 

2730 REM *** Grafikcursor nach rechts** [2545] 
2740 f=1:GOSUB 2940:CLS #4 [998] 

2750 r=r+ra:IF r>era THEN r=gr [1479] 

2760 gb=gb+l:IF gb>gba THEN gb=gbe [1036] 

2770 IF gb=5 OR gb=12 OR gb=17 OR gb=24 OR [4568] 
gb=29 OR gb=36 OR gb=41 OR gb=48 OR gb=53 
OR gb=60 THEN ra=16 ELSE ra=8 
2780 f=2:GOSUB 2940:RETURN [2234] 

2790 REM *** Textcursor nach links **** [2313] 

2800 IF r=0 THEN RETURN [1370] 

2810 IF VZ=22 THEN 2880 [903] 

2820 IF VZ<>33 THEN LOCATE #1,r,10:PRINT # [3762] 
1," ";:CLS #4 

2830 r=r-ra:IF r<gr THEN r=era [1447] 

2840 gb=gb-l:IF gb<gbe THEN gb=gba [1539] 

2850 IF vz=33 THEN CLS #4:PRINT #4,ab$(gb) [3066] 
;:RETURN 

2860 LOCATE #1,r,10:PRINT #1,CHR$(244);:RE [2876] 
TURN 

2870 REM *** Grafikcursor nach links ** [1868] 

2880 f=1:GOSUB 2940:CLS #4 [998] 

2890 IF gb=6 OR gb=13 OR gb=18 OR gb=25 OR [6803] 
gb=30 OR gb=37 OR gb=42 OR gb=49 OR gb=54 
OR gb=61 THEN ra=16 ELSE ra=8 
2900 r=r-ra:IF r<gr THEN r=era [1447] 

2910 gb=gb-l:IF gb<gbe THEN gb=gba [1539] 

2920 f=2:GOSUB 2940:RETURN [2234] 

2930 REM *** Grafikcursor zeichnen **** [2730] 

2940 PLOT r,252,f:DRAW r-8,244:DRAW r+8,24 [4229] 
4:DRAW r,252:RETURN 

2950 REM *** Noten auf Klaviatur oder Lini [4820] 
0 *********************************** 

2960 GOSUB 2130:a$="":CLS #1 [1499] 

2970 a$=INKEY$:IF a$="" THEN 2970 [1455] 

2980 IF UPPER$(a$)="J" THEN VZ=22:gr=40:r= [6768] 
40:era=600:ra=8:gba=6l:GOSUB 3880:GOSUB 21 
60:GOTO 2330 

2990 IF UPPERS(a$)="N" THEN 3020 [1658] 

3000 IF a$<"1" OR a$>"5" THEN 2970 ELSE 23 [2424] 
40 J 

3010 REM **Schluessel festlegen(Noten)* [27221 

3020 GOSUB 2140 :a$=" 11 : CLS #l:GOSUB 3550 [3154] 

3030 a$=INKEY$:IF a$="" THEN 3030 [1451] 

3040 IF UPPERS(a$)="J" THEN w=2:GOSUB 3580 [3503] 
:gz=25:v=l:GOTO 3080 

3050 IF UPPERS(a$)="N" THEN w=22:GOSUB 361 [2240] 
0:gz=19:v=0:GOTO 3080 

3060 IF a$<"l" OR a$>"5" THEN 3030 ELSE 23 [2641] 
40 1 

3070 REM **Zufallsnoten oder Tonleiter* r 1229 1 
3080 GOSUB 2200 ' r Q6 71 

3090 a$=INKEY$:IF a$="" THEN 3090 1439] 

3100 IF UPPERS(a$)="A" THEN GOSUB 2080:GOS [4834] 
UB 2160:GOSUB 2180:GOSUB 3320:GOTO 2330 
3110 IF UPPERS(a$)="B" THEN W=0:GOSUB 2160 [4311] 

:GOSUB 2180:GOSUB 3350:GOTO 2330 

3120 IF a$<"l" OR a$>"5" THEN 3090 ELSE 23 [34381 
40 1 J 

3130 REM **Akkordnoten o. Akkordgriffe* [3106] 
3140 GOSUB 2220:a$="" 1128 

3150 a$=INKEY$:IF a$="" THEN 3150 [1435] 

3160 IF UPPERS(a$)="A" THEN 3200 [1380] 

3170 IF UPPERS(a$)="B" THEN ff=2:vz=33:r=l [4523] 
:ra=l:era=36:gb=l:gba=36:gbe=l:GOSUB 4040: 

GOSUB 2240:GOTO 2330 

3180 IF a$<"l" OR a$>"5" THEN 3150 ELSE 23 [2814] 
40 

3190 REM »Schluessel festlegen(Akkorde)* [1885] 
3200 GOSUB 2140:a$="":CLS #l:GOSUB 3550 [3154] 

3210 a$=INKEY$:IF a$="" THEN 3210 [1447] 

3220 IF UPPERS(a$)="J" THEN w=3:GOSUB 2080 [5587] 

:GOSUB 2170:GOSUB 3580:gz=22:v=0:gb=l:gba= 

9 :gbe=l :GOSUB 3380 .-GOTO 2330 

3230 IF UPPERS(a$)="N" THEN w=33:GOSUB 208 [7515] 

0:GOSUB 2170:GOSUB 3610:gz=22:v=l:gb=l:gba 
=9:gbe=l:GOSUB 3380:GOTO 2330 

3240 IF a$<"l" OR a$>"5" THEN 3210 ELSE 23 [2345] 
40 

3250 REM *Schluessel festlegen(Vorzeichen) [2494] 

3260 GOSUB 2150:a$="":CLS #l:GOSUB 3550 [2364] 

3270 a$=INKEY$:IF a$="" THEN 3270 [1451] 
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3280 IF UPPERS(a$)="J" THEN w=4:GOSUB 2080 
:GOSUB 2170:GOSUB 3580:gz=12:kf=0:GOSUB 35 
30:GOTO 2330 

3290 IF UPPERS(a$)="N" THEN w=44:GOSUB 208 
0:GOSUB 2170:GOSUB 3610:gz=12:kf=10:GOSUB 
3530:GOTO 2330 

3300 IF a$<"l" OR a$>"5" THEN 3270 ELSE 23 
40 

3310 REM Zufallsnoten, Notennamen und Ton 
3320 x=64:FOR i=l TO 17:zz=INT((gz-1)*RND( 

1))+1:GOSUB 3640:GOSUB 3850:GOSUB 4260:X=X 
+ 32:1F v=l THEN gbsS(i)=bsl$(zz):gth(i)=th 
V(zz) ELSE IF v=0 THEN gbs${i)=bs2$(ZZ):gt 
h(i)=thb(zz) 

3330 NEXT:RETURN 

3340 REM »Tonleiter mit Notennamen und Ton 
3350 IF V=1 THEN x=64:FOR i=l TO 17:zz=i:G 
OSUB 3640:GOSUB 3850:GOSUB 4260:x=x+32:gbs 
$(i)=bsl$(i):gth(i)=thv(i):NEXT:RETURN 
3360 IF v=0 THEN x=64:gb=l:gba=17:gbe=l:FO 
R i=l TO 17:zz=i:GOSUB 3640:GOSUB 3850:GOS 
UB 4260:x=x+32:gbs$(i)=bs2$(i):gth(i)=thb( 
i):NEXT:RETURN 

3370 REM *»Akkordauswahl mit Akkordnamen* 
3380 x=80:FOR i=l TO 9:ZZ=INT((gz-1)*RND(1 
) )+l :GOSUB 3660:x=x+64:gbs$(i)=bs3$(ZZ) :NE 
XT:RETURN 

3390 REM *** Begleitakkorde (Fingersaetze) 
3400 IF Z<2 THEN 3410 ELSE FOR i=l TO z:x= 
lx(i):y=ly(i):GOSUB 3480:GOSUB 4130:NEXT:Z 
=1:GOTO 3410 

3410 IF fl(gb)=l THEN x=flx(gb):y=fly(gb): 
lx(z)=x:ly(z)=y:z=z+l:GOSUB 3500:GOSUB 416 
0 

3420 IF f2(gb)=2 THEN x=f2x(gb):y=f2y(gb): 
lx(z)=x:ly(z)=y:z=z+l:GOSUB 3500:GOSUB 417 
0 

3430 IF f3(gb)=3 THEN x=f3x(gb):y=f3y(gb): 
lx(z)=x:ly(z)=y:Z=Z+1:GOSUB 3500:GOSUB 418 
0 

3440 IF f4(gb)=4 THEN x=f4x(gb):y=f4y(gb): 
lx(z)=x:ly(z)=y:z=z+l:GOSUB 3500:GOSUB 419 
0 

3450 IF f5(gb)=5 THEN x=f5x(gb):y=f5y(gb): 
lx(z)=X:ly(z)=y:GOSUB 3500:GOSUB 4200 
3460 LOCATE #1,2,2:PRINT #1," ";:LOC 

ATE #1,2,2:PRINT #1,LEFTS(ab$(gb),4);"..." 

;:RETURN 

3470 REM Farbbestimmung f.Fingers.-Anzeige 
3480 IF y=200 THEN ff=l ELSE ff=2 
3490 RETURN 

3500 IF y=200 THEN ff=2 ELSE ff=l 
3510 RETURN 

3520 REM *** Vorzeichenauswahl mit 
Vorzeichennamen*** , ,, 

3530 FOR i=l TO 5 :zz=INT((gz-1)*RND(1))+l: 
x=sx(i):gbs$(i)=bs4$(zz):GOSUB 4460:NEXT:R 
ETURN 

3540 REM *** Notenlimen und Cursor *** 

3550 x=16:y= 288:FOR i=l TO 5:PLOT x,y,2:DR 
AW x+608,y,2:y=y-10:NEXT 

3560 PEN #1,2:LOCATE #1,r,10:PRINT #1,CHR$ 
(244);:RETURN 

3570 REM *** Violinschluessel ********* 

3580 x=32:y=256 

3590 PLOT x,y:DRAW x,y+6:DRAW x+10,y+6:DRA 
W x+10,y-10:DRAW x-4,y-10:DRAW x-4,y+10:DR 
AW x+10,y+10:DRAW x+ 10 ,y+38:DRAW x+4,y+38: 
DRAW x+4,y-32:DRAW X-2,y-32:DRAW x-2,y-28: 
RETURN 

3600 REM *** Basschluessel ************ 
3610 x=22:y=284:PLOT x,y-2:DRAW x,y+3:PLOT 
x+2,y-2:DRAW x+2,y+3:PLOT X,y+3:DRAW x+12 
y + 3 :PLOT x+12,y+2:DRAW x+15,y-l:PLOT x+13 
,y+2:DRAW x+16,y-1:PLOT x+16,y-2:DRAW x+16 
,y-18:PLOT X+17,y-2:DRAW x+17,y-18:PLOT x+ 
15,y-19:DRAW x+4,y-24 

3620 PLOT x+22,y-1:PLOT X+24,y-1:PLOT x+22 
,y-10:PLOT x+24,y-10:RETURN 
3630 REM *** Notenkopf (1/4 Note) ***** 
3640 PLOT x,sy(zz):DRAW x+16,sy(zz):PLOT x 
+ 2 sy(zz) + 2:DRAW x+14,sy(zz)+2:PLOT x+4,sy 
(zz)+ 4:DRAW x+ 12 ,sy(zz)+4:PLOT x+2,sy(zz)- 
2:DRAW x+ 14 ,sy(zz)-2:PLOT x+4,sy(zz)-4:DRA 
W X+12 ,sy(zz)-4 -.RETURN 

3650 REM *** Notenkopf (1/1 Note) ***** 
3660 IF V=1 AND ZZ>8 THEN ok=-10 ELSE ok-2 

3670 IF v=l THEN syale=syal(zz):sya2e=sya2 
(zz):sya3e=sya3(zz):syal(zz)=syal(zz)+ok:s 
ya2(zz)=sya2(zz)+ok:sya3(zz)-sya3(zz)+ok 
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3680 IF Vl(zz)=l THEN y=syal(ZZ):GOSUB 422 
0 

3690 PLOT x,syal(zz):PLOT x+2,syal(zz):PLO 
T x+ 2,sya1(zz) + 2:PLOT x+4,syal(zz) + 2:PLOT 
x+4,syal(zz)+4:DRAW x+12,syal(zz)+4:PLOT x 
+12,syal(zz)+2:PLOT x+14,syal(zz)+2:PLOT x 
+14,syal(zz):PLOT x+16,syal(zz) 

3700 PLOT x+12,syal(zz)-2:PLOT x+12,syal(z 
z)-4:DRAW x+4,syal(zz)-4:PLOT x+2,syal(zz) 
-2:PLOT x+4,syal(zz)-2 

3710 IF vl(zz)=2 THEN y=syal(zz):GOSUB 424 
0 

3720 PLOT x,sya2(zz):PLOT x+2,sya2(zz):PLO 
T x+2,sya2(zz)+2:PLOT x+4,sya2(zz)+2:PLOT 
x+4,sya2(zz)+4:DRAW x+12,sya2(zz1+4:PLOT x 
+ 12,sya2(zz) + 2:PLOT x+14,sya2(zz)+2:PLOT x 
+14,sya 2(zz):PLOT x+16,sya2(zz) 

3730 PLOT x+12,sya2(zz)-2:PLOT x+12,sya2(z 
z)-4:DRAW x+4,sya2(zz)-4:PLOT x+2,sya2(zz) 

-2:PLOT x+4,sya2(zz)-2 

3740 IF v2(ZZ)=1 AND Vl(zz)=l THEN y=sya2( 

ZZ):x=x-8:GOSUB 4220:x=X+8 

3750 IF v2(zz)=2 THEN y=sya2(zz):GOSUB 424 

0 

3760 IF V2(ZZ)=1 AND vl(zz)=0 THEN y=sya2( 
ZZ):GOSUB 4220 

3770 PLOT x,sya3(zz):PLOT x+2,sya3(zz):PLO 
T x+2,sya3(zz)+2:PLOT x+4,sya3(zz)+2:PLOT 
x+ 4,sya3(zz) + 4:DRAW x+12,sya3(zz)+4:PLOT x 
+12,sya3(zz)+2:PLOT x+i4,sya3(zz)+2:PLOT x 
+14,sya3(zz):PLOT x+16,sya3(zz) 

3780 PLOT x+12,sya3(zz)-2:PLOT x+12,sya3(z 
z)-4:DRAW x+4,sya3(zz)-4:PLOT x+2,sya3(zz) 
-2:PLOT x+4,sya3(zz)-2 

3790 IF V3(ZZ)=1 THEN y=sya3(ZZ):GOSUB 422 
0 

3800 IF v3(zz)=2 THEN y=sya3(zz):GOSUB 424 
0 

3810 GOSUB 4420 

3820 IF v—1 THEN syal(zz)=syale:sya2(zz)=s 
ya2e:sya3(zz)=sya3e 
3830 RETURN 

3840 REM *** Notenhals (1/4 Note) ***** 
3850 IF ZZ<9 THEN PLOT X+16,sy(ZZ)+2:DRAW 
x+16,sy(zz)+42 

3860 IF zz>=9 THEN PLOT x,sy(zz)-2:DRAW x, 
sy(zz)-42 
3870 RETURN 

3880 REM »»Klaviatur fuer Notenabfrage* 
3890 CLS #1:INK 3,13:GOSUB 4020:x=32:y=328 
:PLOT X,y.3:DRAW x,y-64 
3900 FOR li=l TO 5 

3910 PLOT x,y:DRAW x+112,y:DRAW x+112,y-64 
:DRAW x,y-64 

3920 kf=0:FOR i= 1 TO 7:PLOT x+kf,y:DRAW x 
+kf,y-64:kf=kf+16:NEXT 

3930 X=X+12:kf=0:FOR i=l TO 4:PLOT x+kf,y: 

DRAW x+kf,y-32:kf=kf+2:NEXT 

3940 x=X+16:kf=0:FOR i=l TO 4:PLOT X+kf,y: 

DRAW x+kf,y-32:kf=kf+2:NEXT 

3950 x=x+32:kf=0:FOR i=l TO 4:PLOT x+kf,y: 

DRAW x+kf,y-32:kf=kf+2:NEXT 

3960 x=x+16:kf=0:FOR i=l TO 4:PLOT x+kf,y: 

DRAW x+kf,y-32:kf=kf+2:NEXT 

3970 x=x+16:kf=0:FOR i=l TO 4:PL0T x+kf,y: 

DRAW x+kf,y-32:kf=kf+2:NEXT 

3980 x=x+20:NEXT 

3990 PLOT x,y:DRAW x+16,y:DRAW x+16,y-64:D 
RAW x,y-64 

4000 f=2:GOSUB 2940:INK 3,0:CLS #4:RETURN 
4010 REM *** Wartehinweis ************* 
4020 CLS #4:PRINT #4,"MomentRETURN 
40 30 REM **Kl.aviatur fuer Akkordausgabe 
4040 CLS #1:x=128:y=350:GOSUB 4020:INK 3,1 
3:FOR i=l TO 14:PLOT x,y,3:DRAW x,y-174:x= 
X+32:NEXT 

4050 x=152:FOR i=l TO 9 

4060 FOR ii=l TO 5:TAG:MOVE x,y:PRINT CHR$ 
(143);:y=y-16:TAGOFF:NEXT 

4070 IF i=2 OR i=5 OR i=7 THEN X=X+64 ELSE 
X=x+32 

4080 y=350:NEXT 

4090 y=350:x=x+8:FOR i=l TO 8:PL0T x,y:DRA 
W x,y-80:x=x-l:NEXT 

4100 x=364:y=248:PLOT x,y:DRAW x+6,y:PLOT 
x+6,y-1:DRAW x,y-1:PLOT x,y-2:DRAW x,y-8:P 
LOT x,y-8:DRAW x+6,y-8:PLOT x+6,y-9:DRAW x 
,y-9 

4110 INK 3,0:CLS #4:PRINT #4,ab$(1);:RETUR 
N 
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4120 REM **Loeschroutine (Fingersaetze)* [3116] 
4130 IF X=0 AND y=0 THEN RETURN [1023] 
4140 FOR ii=l TO 10:PLOT x,y,ff:DRAW x+6,y [2391] 
:y=y-2:NEXT:RETURN 

4150 REM *** Zahlen (1-5) ************* [1364] 
4160 PLOT X+4 ,y,ff:DRAW x+4,y-l 3 :RETURN [1887] 


4170 PLOT X,y,ff:DRAW x+6,y:PLOT x+6,y-l:D [12528] 
RAW x,y-l:PLOT x+6,y-l:DRAW x+6,y-6:PLOT x 
+6,y-6:DRAW x,y-6:PLOT x,y-7:DRAW x+6,y-7: 

PLOT X,y-7:DRAW x,y-12:PLOT x,y-12:DRAW x+ 

6,y-l2:PLOT x+6,y-13:DRAW x,y-13:RETURN 

4180 PLOT x+6,y,ff:DRAW x+6,y-14:PLOT x,y: [13045] 

DRAW x+6,y:PLOT x,y-l:DRAW x+6,y-1:PLOT x, 

y-6:DRAW x+6,y-6:PLOT x,y-7:DRAW x+6,y-7:P 

LOT x,y-12:DRAW x+6,y-12:PLOT X,y-13:DRAW 

x+6,y-13:RETURN 

4190 PLOT X,y,ff:DRAW X,y-7:PLOT X,y-7:DRA [7511] 

W x+6,y-7:PLOT x,y-6:DRAW x+6,y-6:PLOT x+6 
,y:DRAW x+6,y-13:RETURN 

4200 PLOT X,y,ff:DRAW x+6,y:PLOT x,y-l:DRA [ 13387] 
W x+6,y-l:PLOT x,y-2:DRAW x,y-6:PLOT x,y-6 
:DRAW x+6,y-6:PLOT x+6,y-7:DRAW x,y-7:PLOT 
x+6,y-7:DRAW x+6,y-12:PLOT x+6,y-12:DRAW 
x,y-12:PLOT x,y-13:DRAW x+6,y-13:RETURN 
4210 REM *** Vorzeichen 'Kreuz' ******* [1431] 

4220 PLOT X-12,y+8:DRAW x-12,y-10:PLOT x-8 [8367] 
,y+l0:DRAW x-8,y-8:PLOT x-16,y+2:DRAW x-4, 
y+6:PLOT x-16,y-4:DRAW x-4,y:RETURN 
4230 REM *** Vorzeichen 'b' *********** [1055] 

4240 PLOT X-12,y+8:DRAW x-12,y+4:PLOT x-12 [5209] 
,y+4:DRAW x-6,y+4:DRÄW x-6,y:PLOT x-8,y-2: 

PLOT X-10,y-4:DRAW x-12,y-4:DRAW x-12,y+4: 

RETURN 

4250 REM *** Hilfslinien (Noten) ****** [3324] 

4260 kf=0 [173] 

4270 IF ZZ=1 THEN FOR ii=l TO 2:PLOT X-4,S [5037] 
y(zz)+kf:DRAW x+20,sy(zz)+kf:kf=kf+10:NEXT 
4280 IF zz=2 THEN PLOT x-4,sy(ZZ)+5:DRAW X [2353] 
+20,sy(zz)+5 

4290 IF zz=3 THEN PLOT x-4,sy(zz):DRAW x+2 [2853] 
0 ,sy(zz) 

4300 IF ZZ=15 THEN PLOT x-4,sy(ZZ):DRAW x+ [2361] 
20,sy(zz) 

4310 IF ZZ=16 THEN PLOT X-4,sy(ZZ)-5:DRAW [3392] 
x+20, sy(zz)-5 

4320 IF ZZ=17 THEN FOR ii=l TO 2:PLOT x-4, [4731] 
sy(zz)+kf:DRAW x+20,sy(zz)+kf:kf=kf-10:NEX 
T 

4330 IF zz=18 THEN kf=-5:FOR ii=l TO 2:PLO [4991] 

T x-4,sy(zz)+kf:DRAW x+20,sy(zz)+kf:kf=kf- 
10:NEXT 

4340 IF zz=19 THEN FOR ii=l TO 3:PLOT X-4, [6383] 
sy (zz) +kf: DRAW x+20, sy (zz) +kf: kf=kf-10: NEX 
T 

4350 IF ZZ=20 THEN kf=-5:FOR ii=l TO 3:PLO [5048] 

T x-4,sy(zz)+kf:DRAW x+20,sy(zz)+kf:kf=kf- 
10:NEXT 

4360 IF ZZ=21 THEN FOR Ü=1 TO 4:PLOT x-4, [4217] 
sy{zz)+kf:DRAW x+ 20,sy(zz)+kf:kf=kf-10:NEX 
T 

4370 IF zz=22 THEN kf=-5:FOR ii=l TO 4:PLO [3551] 

T x-4,sy(zz)+kf:DRAW x+20,sy(zz)+kf:kf=kf- 
10:NEXT 


4380 IF zz = 23 THEN FOR ii = l TO 5:PLOT x-4, [5324] 
sy(zz)+kf:DRAW x+20,sy(zz)+kf:kf=kf-lO:NEX 
T 

4390 IF zz=24 THEN kf=-5:FOR ii=l TO 5:PLO [6330] 
T x-4,sy(zz)+kf:DRAW x+20,sy(zz)+kf:kf=kf- 
10:NEXT 

4400 RETURN [555] 

4410 REM *** Hilfslinien (Akkorde) **** [3400] 

4420 IF syal(zz)=298 THEN PLOT x-4,syal(ZZ [2268] 
):DRAW x+20,syal(zz) 

4430 IF sya3(zz)=238 THEN PLOT x-4,sya3(ZZ [3136] 
):DRAW x+20,sya3(zz) 

4440 RETURN [555] 

4450 REM *** Vorzeichen setzen ******** [703] 

4460 IF ZZ=1 THEN y=288-kf:GOSUB 4220 [1989] 

4470 IF zz=2 THEN y=288-kf:GOSUB 4220:x=x+ [4574] 
16:y=273-kf:GOSUB 4220 

4480 IF zz=3 THEN y=288-kf:GOSUB 4220:x=X+ [5868] 
16:y=273-kf:GOSUB 4220:x=x+16:y=293-kf:GOS 
UB 4220 

4490 IF ZZ=4 THEN y=288-kf:GOSUB 4220:x=x+ [8034] 

16:y=273-kf:GOSUB 4220:x=x+16:y=293-kf:GOS 

UB 4220:x=X+16:y=278-kf:GOSUB 4220 

4500 IF ZZ=5 THEN y=288-kf:GOSUB 4220:x=x+ [6302] 

16:y=273-kf:GOSUB 4220:x=x+16:y=293-kf:GOS 

UB 4220:x=X+16:y=278-kf:GOSUB 4220:x=x+16: 

y=263-kf:GOSUB 4220 

4510 IF zz=6 THEN y=288-kf:GOSUB 4220:x=X+ [8431] 
16:y=273-kf:GOSUB 4220:x=x+16:y=293-kf:GOS 
UB 4220:x=x+16:y=278-kf:GOSUB 4220:x=x+16: 
y=263-kf:GOSUB 4 2 2 0:x=x+16:y=283-kf:GOSUB 
4220 

4520 IF zz=7 THEN y=268-kf:GOSUB 4240 [1662] 

4530 IF ZZ=8 THEN y=268-kf:GOSUB 4240:x=X+ [3581] 
16:y=283-kf:GOSUB 4240 

4540 IF ZZ=9 THEN y=268-kf:GOSUB 4240:x=x+ [5978] 
16:y=283-kf:GOSUB 4 2 40:x=X+16:y=26 3-kf :GOS 
UB 4240 

4550 IF zz=10 THEN y=268-kf:GOSUB 4240:x=x [6914] 

+16:y=283-kf:GOSUB 4240:X=X+16:y=263-kf:GO 

SUB 4240:x=X+16:y=278-kf:GOSUB 4240 

4560 IF ZZ=11 THEN y=268-kf:GOSUB 4240:x=x [8847] 

+ 16:y=283-kf:GOSUB 4240:x=x+16:y=263-kf :GO 

SUB 4240:x=x+16:y=278-kf:GOSUB 4240:X=X+16 

:y=258-kf:GOSUB 4240 

4570 FOR ii=2 TO 5:PLOT sx(ii)-20,288:DRAW [2742] 
SX(ii)-20,288-40:NEXT 

4580 RETURN [555] 

4590 REM *** Laufschrift mit Sound **** [2232] 

4600 EVERY 8,2 GOSUB 4610:RETURN [2016] 

4610 IF q=0 AND spr=l THEN 1=0:GOSUB 2600: [2354] 
q=l 

4620 INK 3,f:LOCATE n,2:PEN 3:DI:PRINT MID [2756] 
$ (tj.$,n, 1) ; :SOUND 2,thv(h) ,16,1 

4630 n=n+l:IF n>26 THEN n=15:LOCATE 15,2:P [3678] 
RINT STRINGS(12," "):f=f + l 

4640 h=h+l:IF h>he THEN h=ha:ha=ha+l:he=he [1620] 


+ 1 

4650 IF he>24 THEN h=l:he=12:ha=2 [1814] 

4660 IF f>26 THEN f=14 [1310] 

4670 IF spr=0 THEN ta=0:aw5=25:RETURN [2600] 

4680 ta=ta+l:IF ta=aw5 THEN ta=0:aw5=0 [617] 

4690 RETURN [555] 

4700 REM [272] 

4810 RETURN [555] 


Floppy'S für CPC 464/664/6128 


•STARDRIVE Zweitlaufw. anschlußfertig für CPC: 

•Stardrive 5,25‘'-TEAC- (720/360 KB) DM 289,00 

•Stardrive 3,5" -TEAC- (720/360 KB) DM 239,00 

•Stardrive 3“-Hitachi- (360 KB) DM 199,00 


•STARDRIVE Erstlaufw. für CPC 464: 

•Stardrive 3“ -Hitachi- (incl. Kontr.) 

DM 395,00 

‘Stardrive 5,25"-TEAC- (incl. Kontr.) 

DM 469,00 

DISKETTEN (Auszug): 

5,25"-40 TPI (MD2D) (10 Stk.) 

DM 7.50 

3,5' • 135TPI (MF2DD) (10 Stk.) 

DM 15.00 

3“ - Maxell CF2-(10 Stk.) 

DM 59,00 

Weitere Angebote entnehmen Sie bitte u. ProspoktonfListen, die wir Ihnon gorno kostenlos zuschickon. 

Proiszzgl PortofVorpackung 


C + L electronic 


Computerhardware 


6759 Hefersweiler’Seelenerstraße 4*Tel.: 

06359/2582 


fafjik- & önmndmofjtwm 


LABEL-MASTER 1.0,3"-Diskette + Handbuch DM 64.95 

Vorgessen Sie einfach alles, was Sie an Eiikelton-Programmon lür den CPC kennen, Label-Master verbinde) die 
einlache Bedienung eines herkömmlichen Etikelfen-Programms mll den giaflschon Fähigkeiten von Pro-Design 
Viele wunderschöne Gralikon por Knopldruck abrufbar. 9- und 24-Nariel-Druckerlretber. Mil Label-Master er¬ 
stellen Sie keine Nullachtfünlzehn-Ellkolton, sondern kleine Kunstwerke, 

PRO-DESIGN 2.1, 3‘-Dlske1te + Handbuch DM 64,95 

Dor Klassikor unter den DTP-Programmen. Im I landumdrohen crstollon Sie professionelle Grafiken. Rahmen, 
Schmuckllnion, Symbole und lOSchriften + CPC-Zeichensalz (alle mll äöüÄOÜB). 50 Zusatzschriften erhältlich 
16 Drucklormalef144 Darslellungsloimato, kostenlose Druckeranpassung usw, usw 


PRO-BOOSTER 1.2,3‘-Diskotto * Handbuch DM 34,95 

Dokumonton-Druckprogramm. Grali k-Schrillbandgenerator. Snapsholutility. Die ideale Ergänzung zu Pro-Design 
DESK-ROYAL 1.0,3‘-DiskeUe + Handbuch DM 54,95 

38 neue BASIC-Bolehle sorgen für PC-Luxuswia Deskfopsleumungund Dialogboxen jetzt auch in Ihren Pro¬ 
grammen, auf Ihrem CPCI Kinderlelchle Anwendung, Software vom Feinsten für alle kreativen BASIC-Freunde. 
Versand gegen Verrechnungsscheck (»3,- DM) oder Nachnahme (+6.- DM). Weitete Angebote In unserem Katalog. 


I 


KOSTENLOSER KATALOG 


AXEL WEBER, POSTF, 260154, D-5600 WUPPERTAL 28 
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CP/M 


Einer für alle 

Mehr Diskettenplatz für CP/Mler 

So eine 3-Zoll-l)iskette des CPC ist, wenn man Programme in Turbo Pascal 
schreibt, sehr schnell voll. Wie Sie solchen Platzfressern ein Schnippchen 
schlagen können, zeigt Ihnen dieser Beitrag. 


In Turbo Pascal geschriebene Program¬ 
me belegen immer übermäßig viel Platz 
auf' der Diskette. Testen Sie beispiels¬ 
weise folgendes Programm: 

PROGRAM leer; 

BEC-1N 

END. 

Lassen Sie es vom Compiler in eine 
COM-Datei übersetzen. Sie werden 
staunen, das Programm wird 8192 
Bytes groß. 

Turbo Pascal verbindet jedes Pro¬ 
gramm. das als COM-Datei abgespei¬ 
chert wird, mit der Laufzeitbibliothek. 
In dieser sind stets alle Routinen vor¬ 
handen, egal ob Ihr Programm sie 
benötigt oder nicht. Bei zehn abgespei¬ 
cherten Programmen belegt die Lauf¬ 
zeitbibliothek schon über die Hälfte Ih¬ 
rer Dalend iskette. 

Kann man dagegen nicht etwas unter¬ 
nehmen? Wie wäre dies: Die Laufzeit¬ 
bibliothek ist nur einmal vorhanden, 
und alle anderen Programme nutzen 
sie. Sie können also auf den reinen 
Codebereich begrenzt werden. In Tur¬ 
bo Pascal wurde die Möglichkeit vor¬ 
gesehen. daß ein Programm über die 


Funktionen EXECUTE und CHAIN 
weitere Turbo-Pascal-Programme aul¬ 
ruft. Während EXECUTE ein vollstän¬ 
diges Programm lädt, überschreibt 
CHAIN lediglich den alten Codebe¬ 
reich mit dem neuen Programmcode. 
Die ursprüngliche Laufzeilbibliothek 
bleibt erhalten. 

Um solchen nachladbaren Programm¬ 
code zu erzeugen, bietet der Compiler 
eine spezielle Option an. Wählen Sie 
diese an, werden die Programme als 
Chain-Files (.CHN) abgelegt. Diese 
enthalten nur den reinen Programm¬ 
code. Auf unser obiges Beispiel ange¬ 
wendet, ergibt sich also folgendes: 

Date i G rö ße i n B y les 

LEER.PAS 22 

LEER.COM 8192 

LEER.CHN 29 

Das ist eine erhebliche Platzersparnis. 
Es wird also ein Programm benötigt, 
welches die auf der Diskette befindli¬ 
chen CHN-Dateien mit der Laufzeit¬ 
bibliothek verbindet und startet. Das 
abgedruckte Listing TEXE.PAS zeigt, 
wie ein solches Programm ausschen 


kann. Mit Hilfe des Programms werden 
COM- oder CHN-Dateien geladen und 
zur Ausführung gebracht. Dabei kann 
das zu startende Programm als Argu¬ 
ment vonTEXEin der Kommandozeile 
angegeben werden, oder aber der Pro¬ 
grammname wird vom TEXE-Pro- 
gramm angefordert. 

Bei der Angabe des Programmnamens 
braucht die Extension nicht mit aufge¬ 
führt zu werden. TEXE sucht selbstän¬ 
dig erst nach CHN- und dann nach 
COM-Programmen. Parameter zu den 
aufzurufenden Programmen können 
ebenfalls in der Kommandozeile mit 
angegeben werden. 

TEXE Programmname Parameter 
Das Programm besteht aus zwei Teilen, 
der Funktion “LTrimStr” und dem 
Hauptprogramm. Die Funktion 
“LTrimStr” beseitigt führende Leerzei¬ 
chen aus dem ihr übergebenen String. 
Das Hauptprogramm testet als erstes 
die Systemvariable PARAMCOLJNT, 
in der die Anzahl der übergebenen Pa¬ 
rameter abgelegt ist. Wurde nichts aus 
der Kommandozeile übergeben, fragt 
das Programm den Namen und die Ar¬ 
gumente des zu startenden Programms 
ab. Nun wird der Programmname von 
den Parametern getrennt und diese wie¬ 
der in der Kommandozeile abgelegt. 
Nachdem die Extension abgespalten 
wurde, wird nun versucht, das File mit 
der Erweiterung .CHN oder .COM zu 
starten. Gelingt dies nicht, endet das 
Programm mit einer Fehlermeldung. 

M.Ceol.B. Born/jg 


(*************************************************) 
(* TEXE.PAS *) 

(* (c)1992 Born, Ceol, CPC International *) 

(*TEXE ruft ein weiteres Turbo Pascal-Programm *) 

(♦auf, das mit der CHN-Option kompiliert *) 

(♦worden sein kann. Auch COM-Programme werden *) 

(♦gestartet.. *) 

(*********************************************♦***) 
PROGRAM TurboExe; 

TYPE strng=STRING[255]; 

VAR ProgName, 

Param :strng; 

ProgFile :FILE; 
i :INTEGER; 

ComLine :STRING[128] ABSOLUTE $80; 


(♦entfernt fuehrenede Leerzeichen aus 
Zeichenkette*) 

FUNCTION LTrimStr(s:strng): strng; 

BEGIN 

WHILE(Length(s)>0) AND (s[l]= ’ 1 ) DO 
s:=Copy(s,2,Length(s)); 

LTrimStr:=s; 
end; 


BEGIN 

Writeln; Writeln; 

Writeln('TURBOEXE', 

' (c)1992 CPC International'); 

Writeln; 

ProgName:=''; Param:=''; 

IF ParamCount=0 THEN BEGIN (‘nichts in 

Kommandozeile*) 

I... 


Writeln('Programm-Name[Parameter]: '); 

Write(’>'); Readln(Param); 

END 

ELSE (*aus Kommandozeile uebernehmen*) 

FOR i:=1 TO ParamCount DO 

Param:=Param+' ’+ParamStr(i); 

Param:=LTrimStr(Param); (*Name von Parametern 

trennen*) 

ProgName:=Copy(Param,1,Pred(pos(' ',Param))); 
(♦keine Parameter zu uebergeben, also 
nur Programmname*) 

IF ProgName='' THEN ProgName:=Param; 

(♦aktuelle Parameter wieder in Kommandozeile 
ablegen*) 

comline:=Copy(Param, 

Length(ProgName)+2,Length(Param)); 
i:=Pred(Pos('.',ProgName)); (*Extens. abspalten*) 
IF i<l THEN i:=Length(ProgName); 

ProgName:=Copy(ProgName,1,i); 

(*$!-*) 

(♦zuerst wird versucht ein Chain-File zu starten*) 
Assign(ProgFile,ProgName*'.CHN'); 

Chain(ProgFile); 

(♦ging nicht, jetzt mit COM-File versuchen*) 

IF IOResultoO THEN BEGIN 

Assign(ProgFile,ProgName*'.COM'); 

Execute(ProgFile); 

END; 

(♦Programm nicht gefunden, also Fehlermeldung *) 

IF IOResultoO THEN 

Writeln (' * “Fehler: " ' , ProgName, ' " konnte', 

' nicht gestartet werden !'); 

end. 
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Ihre Quelle für 
bewährte Qualitäts¬ 
software: Bei uns 
finden Sie Futter 
für Ihren Computer 
— zum Mini-Preis! 


r 


Beachten Sie bitte für 
alle Produkte im DMV- 
Versandservice unsere *\Zersandhcdingungen 
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' l.nahlulngig von ifcr Au/.ali I der Ivsk'lUou 
Programme oder I lelle berrehnen wir bei ii'dei 
Sendung lüi das Inliuiil 4 UM. Iin das Ans 
laikio. DM Porto uml Verpackung. Alle Soft¬ 
ware-Produkte Dir CI’C uilil Joyce wenkMi. 
wenn nicht anders angegeben, auf >-Ail! I>i\ 
keilen ausgchclei I. Bille henehten Sic die je 
woiliv.cn Bestellnummern iiml licuuizeu Sc die 
diesem lleli bcigeliiplen Besiellkaiton 


DMV-Verlag • Postfach 250 • 3440 Eschwege 




für CPC 464, 
664 und 6128: 



CopyShop 

Das universelle Rildschirmdiiick-I’rogrnmiii für «Ile (.PCs, Wol¬ 
len Sie Ihre iruuinhali schöne Fraktulgnüik im Freundeskreis zeigen, 
inler brauchen Sie zu Ihrem selbstgeschriebenen JVngramm einen 
Koruroli Ausdruck? CopyShop bnngl llu« Bildschinniiiisichlen t.u 
Papier. auch mii den exotischsten Druckern. Verschiedene Schraffu¬ 
ren für OrauOne Innen sich den einzelnen Bildschirmfarhcn frei 
zuordnen. Ern Show Modus zeigt Ihnen die Hardcopy vor dem 
endgültigen Ausdmck auf dein Bildschirm! 

B Vcrarberlcl Hlldei im Suuidaid-Scrcenfwmal 1 17 kBylc- 
Binäriilcsl 

B Vier Ausdruck-Formate von handlich bis DIN A 4 quer 
B Af heilet in allen drei CPC-Bildschiriiimodi 

B Integrierter Graflkcdilor um Hillfunklion und Druck- 
voran ss icl n 

B Beliebige AussdimlisvcrgröBcrungcn und Invcriicmng 
B AnpassungsmenU lür alle Epson- und Scikoslm-Druckcr 
B Auch lür gedrehte Bilhild-Bytes, z.H. beim NEC P2 
B Mit speichcrplai/sparcrolCiti Scieeriiluinp-Ulility zum Vorlu- 
dcu — erzeugt auf Tastendruck Bilddaleicn im Standard-17- 
kByte Formal aus beliebigen laufenden Programmen heraus 
B Mil sclhsliclo/.ierender Hardcopy- Rout Ine lür eigene Pro¬ 

gramme 

Ilest.-Nr, 202, DM 4Ü.- 


Turbo-DATA-CPC 

Volldampf in der Datcivcrwaltung 

Brauchen Sic cmiicucs Adreßbuch odcrTelcfonvcrxcichnis? Müssen 
Sic Ihre Sammlungen von Briefmarken, Schnllplaiteu, Dias oder 
anderen Schürzen sortieren? Alles kein Problein mit lürbo-DATA- 
CI’C. der universellen Datenbank für rille ( PCs mil Diskettenlauf¬ 
werk. 

I Turüo-ÜAI A-CPC h illi Ihnen. Ubersichl und Ordnung in Ihre Daten 
.•ii hringen Ein kurzer Blick auf einige Lcisiungsinerkmale gefällig? 
I — Bille sehr 

| B Univeisell durch vcrliiKlcrhare Fm und Ausgahemaskcn 
B Dcnlsdie Umlaute mir DIN liisUiluibek-gung 
B Blitzschnelle Suchfunklkinen dureh Indes leider 
B Dmeikapa/iiai bis zu SO verschiedenen Feldern 
B Bis zu Id Felder gleichzeitig auf dem Bildschirm sicluliai 
B Besomlcis sc'lindlc und umfangreiche- .Notticrfunkliou 
I B Eigene Diskcuen lüiiiiuiicnviuiim- mil besonders hoher 
Kupaziliil 

I B /weilcilung des Bildschirms in Slalus und Arbeitsfeld 

I Komplclie Druckroiuliien. auch für Elikcllcndruck 
ltcsC.-Nr.2l4.DM <•*»..» 


Kür Profis: CPC Special Offer 2 

Vier Pnigraiuine tlcr Star-Division im Sonderpreis-Paket 

Diskwrl-Slar: I cisuingxsuirkc Diskenenvcrwaltuire mil hohem Bedie 
mmgskoinloii und integriertem Diskclleqmanagcr. Verwalten, Ardii 
vieren, Katalogisieren Ihrer Diskellen und Ausdruck der Daten — mil 
Disksoit-Siar kein Problem. 

Designer-Stnr. Malprogmmm zum komfortablen Anfcrtigen von ßild- 
schimigralikcn. Zur Bedienung gcnuci die vertraute Tastatur. Auf 
Tastendruck wenlcu Sie per llill smcntl durch das Programm geführt. 

< ttninr-Slar: Machen Sie Ihre eigenen CPC-Kaste-Programme durch 
Incklilmsequenzcn mil an i miener Zc i chcnsatz.gm lik interessanter. I >cr 
Creator Star hictci je einen Editor für siebende und animierte Motive 
i Kulissen und Shapc-Designer). Die Editoren sind als l*mgiununmic- 
ratoren ausgclegl und erzeugen Basic-Code, der innerhalb Ihrcrcigcncn 
Programme wcitcrvcrarlxiilci und cingcscl/i werden will Belichige 



Laufschrill TeMC lassen sich integrieren. In einer eigenen Program¬ 
miersprache lassen sich Shapcs inileinnnilei verbinden und Kulissen 
Ubcieiiiamlerlegcn. 

Star-Mun Professionelle CPC-Prognunmiciung mil Assembler. Disax 

scmblcr und Monitor. Das System Ivsilzi einen eigenen Diskette.. 

nuor und Eiliior, eine l'racc Funktion. kann Breakpoinis -ci/cn und 
Baiikswiiching vornehmen. 


4 Programme für CP( -Profis inl Pakei: Best. Nr. 2IIS. DM ?«>.-=> 


»ftinr »nJtr schon im! mii au HrJK» 

't 1 "! brobdr.l für CgnKxl CK . ]|> lUtib« 
mUinondcr htb«, Juais froirizo nukl jo ssh» 
mt. «an «im*r TrilvwirMitung pruirUL 

»o >j|lm «ir ienn m ins» huisdnn PtHdHiKUK» tu ghith. oben . 

Jirif sicht sin sill'l nichi Kickt uid lut sich l«f 
io Willst« Mmn imUlt in nuffir.n !nuwr li« btt 
»it IrMit ru vo-hrnii»’ 

hi« ist phi Trst-Tr«t, ni« JrifKnnr. uni 

Dies ist o o Ii t breit. 

Achten Sic- bitte auf d 

Umbruchs-Soli lau f lieber . . . 


Seü seinem I [scheinen I «Wh ist dieses Scluciliprogramm lür den CK' 
viele tausend Mal verkauft worden. Die l.mserzung uuTden PC fand 
inz.wischcn sogar sechsstellige Benutzcrz.ahlen. Kein Wunder: Con 
lest isi ein simples Programm, ohne Schnörkel und unnötige Kompli- 
/icnhcilcn, Man kommt schnell damit klar und envidn das Ziel — die 
ftigliclie Schreibarbeit zu vereinfachen ohne Umwege. Fs >1 ein 
Programm, das in erster Eime nichi den "Freak - und Spezialisten, 
sondern den Praktiker onspriehl. Den -Siuüenien, der seine Referate 
ohne lippfelder ubgeben möchte Den Pfarrer, der seine Predigient- 
»ürle saubci und wiederverwendhar ahspciclicni und archivieren 
miichic Den VeroinsvoiMand, ik-rdas neue Jahresprogramm ausliangs- 
reil zu Papier bringen will. Und natürlich den Programmierer, der zu 
seinem Werk eine ansprechende und gut lesbare Dnkuinc-uiation i isifeni 
möchte. .Also Man könnte sagen, dall Cnnleti so etwas wie der 
"Küfer -- unter den icxlprogrammen isi es lauft und lauft und lauft.., 

Dali die Darstellung der Texte daridicr liiuaus auch nm ft besonders 
ansprcclraid isi und alle Programmlünkiioncu erfreulich ilou arbeiten, 
isi das Venlicnsl des Progiaiiniuulors Matthias I ipludl.der sich auch 
durch andere Projekte l"Copy-Sbop'. "das Sofbvare-Espenmenr - ) 
einen Namen m der CPC-S/eno gemaeln hat. 


CunText ( PC: die alltuKstau^liehe 
Textverarbeifiins lür jeden CPC! 

Lassen Sie Ihren CPC nicht verstauben! Mil 
ConText CPC erwerben Sic ein Anwendungs¬ 
programm, das eine überzeugende Leistung bei 
einfacher Bedienung bietet. Die ausführliche 
deutsche Anleitung macht es auch dem techni¬ 
schen Laien möglich, schon nach kürzester Zeit 
Briefe. Referate und vieles andere mit dem 
Computer zu schreiben. 

Mn Con lex! CPC macht das Schreiben richtig SpalS: 

B Einfügen. I Iil'HicxI, Blocklömuiticrung und Kopieren .ml 
Tastendruck 

B 2S kliyie lcxis|vieher. ausreichend lür mindestens lind DIN 
A4-Seilen 

B Mehrspalligc l exle und Kopieren lln besondere Aul gaben 
B Texlhlileke von Diskelle oder Kesselte naehUllxii mul jeilei 
zeil im Texl zu plazieren 

B Drucken im Hintergrund, wahrend Sie wi-ilei .in Ihren lexicu 
aibcttcii 

B Echlhild-Dnrslelliing der Sclirifuricn VeijiriilK-n und 
l.rHciMrä-hcn 

I Ins Textpnigr.imm iulcgricrler Tas. ln-nreeftuei und K.ileud.T 
B Variable Drikkeranpassung mil l uiMelliiKiglielikeu in l.iliel 
lenlönn 

B WonlSnir-kompalihle Tastalui konmiaidos Ihr den leieltlei. 
Mnisiieg 

Ilest.-Nr. 207. DM 
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Das Beste von RE-Software: 

Ausgewähite und geprüfte Qualitäts-Software für CPC 
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Jetzt exklusiv zum Lächel-Preis beim DMV 

Wie wär’s denn damit: _ 

The Player’s Dream Vol. 3 




Eine Sammlung besonders attraktiver Spiele, pro¬ 
fessionell programmiert und mit detailreicher Gra¬ 
fik ausgcstattei. best.-Nr. l‘>4. DM 19.-* 

Killer Kunibert: Eines der witzigsten Keaklionssplelc ftlr den CPC, 
tempogc laden mul mitdcuiilreichef Farbgrafik Verheilen Sic Kimi 
bcrldaz.u, Sprung liir Sprung die Burg seines Erzfeinds zu stürmen. 
Vorsiclll: dieses Spiel macht stiehlig! 

I'nnik im Labyrinth: P.nvas für Freunde gepflegter Hektik. Milten 
meinem Riesenlabyrinth mit hcrumzappclndcn undumhcrwi sehen 
den Etter gichcsscru erwacht llue Spiclfigui. lind jetzt gilt es, ein 


knappes Dutzend Schlösser zu linden. Das Spiel liestidil dureli 
blitzschnelle Bi Id Wechsel und seidenweiche Joystick Stcueiung. 

Bulldozer Eine pfiffige Mischung aus , l > ae-Man"und ".Soko-Ban". 
mit liebevoll gestalteter Ch.irsclcr-Grafik 

Froggle "Tieiisehes ' JimipTi Run-Spiel mit I loriznutal-Scrolling. 
FUr i oder 2 Spieler simultan. 

Soll-Ball I III Hipper mit -zig verschiedenen, zixkigcn Gcrriuschcn 
- Ihr alte, denen Ar/l oder Fliel'raii den ßesneh der Kneipe an der 
Ecke verboten haben. 

Do« Jones Ein grafisch nufgepepptes Borscnspicl im EDV-Milieu. 
Kaulen Sie Atari, IBM oder Amstrad machen Sie Millionen oder 
verlieren Sie Haus und Hof. 


Persiinliehkcitstest: Optisch gelungene "Sclhstaiuilyse" lüi den 
kleinen Psychologen. Nicht ganz ernstgemeint, macht ahcrSpaß. 

Skat: Eines der raren Skalprogr.munc. Fehlen der zweite und dritte 
Mann Ihr eine züntiige Partie? Dieses Programm hilft aus. Aiifwcn 
dige Faibgrafik 

Memotron: Die schönste "Memory"-Version. die es je auf einem 
«-Bit-Computer gegeben hai Sie spielen simultan gegen den Com 
guter oder einen menschlichen Gegner und können das gegnerische 
Spiel durch Ihre eigenen Spielzügt- manipulieren. Gutes Gedächtnis 
um! Reaktion wurden so gleichermaßen iruinicn 

Q-Bert 2: Neue Version des liebenswerten klassischen Perspektiv 
Hüpfspiels, Viel Feind, viel Ehr. 


The IMayer’s Dream Vol. 6 

Ein Pakei besonders anspruchsvoller Spielpro¬ 
gramme, die nie langweilig werden — mal flöte und 
kernig, mal tüftelintensiv. Best.-Nr. 195, DM 19,-* 

Soko-Ban (amstriulor Eine Heiaiisfoidening lüi Ihre kleinen 
grauen Zellen. Finden Sic die richtige Vofgehcnsw-eisc Kn jedes 
Spielte vcl. Mil Blldselilnn-Fdilor /.um Gestallen und Ahspeichcm 
eigener I .evcls. Fünf I z'vcls werden milgcltcfen. Achtung: absolutes 
Siichlspiel. der Effekt ist ''l-cmiiiiiigs"-iibii)icb! 

Air Trafltc Control: Koordiiliercii Sie den Luftverkehr zwischen 
acht europäischen FluglKildll Verliiiidcm Sie /.usammcnslößc. m 
dem Sie den Piloten die richtigen Informationen geben. Aufregende 
Simulation im Grafikmode 2. 

Double in Space: Strategie und ll-mpo in einem faszinierenden 
Spiel vereint. Hier wird nicht geballert, sondern um kühlem Kopf 


eine Bahn lür einen Spaee-.Scoolcr gehaul Sehr hohe Splclmplivn- 
lion. delailreiche Gralik. Mit Level-Editor 

Super Iiuhik's < ’iihe Der berühmte “Zauberwürfel" aul dem t'P( - 
Bildschirm. Mit Spiegeln Ihr die verdeckten Würfclscitcn. Für Freun¬ 
de ver/wickter KombnuUion 

Alien Attack Auch das klassische Ballcrspicl für die Arbeitspause 
darf nicht fehlen Diese ' Space Invadcis" Version überzeugt durch 
ihre liebevoll gcstaltele Gralik 

Olk: Icmporeichc.s. "Pacman" artiges Aciionspiel mil niedlich ani¬ 
mierter, huitcrw'clchcr Spritc-Gmlik und vielen, vielen Monstern, 

Dallas Oil Muimgement C'rcscIlsthalKsplcl für bis zu 4 Personen. 
Reizvoll durch ineinander verschachtelte iransaktionen. 

Reparatur Flottes Taktik-lind Action Spiel mil farbiger ClMi oetct 
Grafik Beherrschet) -Sic das Schlachtfeld? 

Gardner-Spiel Kombination ist angcsagl hei diesem Spiel mit 
Vektoren. Diagonale, senk oder waagerechte Reihen von Steinen 
werden auf einem Spielfeld mampulieil. Elwas für Tüftler. 


Puzzle — 
make it! 

Neun verschiedene 
Schiebe-Puzzlcs 
zum Entspannen: 
von den “Ghost- 
busters" über Co- 
nan und Obelix bis 
hin /.um Madonna- 
Poti rät. 

255 Schwierigkeits-Stufen. Testen Sie Ihre Vor¬ 
stellungskraft! liest.-Nr. 196, DM IS,-* 



Codex Vol. 5 

Ein Anwenderpaket für kühle Rechner und Freunde 
des geschriebenen Wortes. Besl.-Nr. 265. DM 19,-* 

Icxtmaker: Ein einfaches Tcslvcrarbcilungsprogramm zum Briefe 
schreiben, Bi icfkopl gesoiidcrt erfaßbar. Blocks;«/ Datei-Manager, 
einstellbarer Tabulator Zeilenhreilc bis 72 Zeichen Deutsche 
Schreibmaschinen-r.isiaturbelcgui^ mit DIN-Zcichcnsatz. Basic- 
Programmierer können die Roulinen für den Ische Umlaute und ß 
auskoppeln und in iiirc eigenen Piogiaiiiiiic einbindeii. 

Papcrmakcr: Ein Mim DTP Programm für die .Schiller- oder Ver- 
einszcilimg. Mehrspaltiger Text. Schlagzeilen und ZeitunRskopf las¬ 
sen sich frei aul der Seite plazieren. Einfache GeomeIriegralik für 

Zcitungskopti Köpfe. Schlagzeilen und Artikel getrennt spcicherbnt, 
/Ausgabe l ür Epsni!-koni|iulil>le Drucker Mi; einer Demo Zeitung als 
Beispiel. 


Typograph: Mii diesem Programm 
Gralikschiiften auf dem Bildschirm, 
liue liißl sich die Schriflkunsl auch 
zu Papier bringen. Freies Skalieren 
und Positionieren der Sebrili/ei- 
ehen. Ein kompleller Font im "We¬ 
stern l.ook" wird miigeliefcn 
damit Sie gleich loslcgcn können 

MultHrainer Ein komfortables 
Lern-, C'himgs und lest-Pro- 
granini lüi beliebige Multiple 
Ghoicc- Auf gaben 
beispielsweise Führerschein! ragen. 
Pnifungsaulgaben. Chcc klisten 
oder Psycho-Tcsls. Ergchnisproto- 
kollc speicherbar. Zciirahmcnilbcr 
Prüfung ein gebaut. 


emwerfen und vcrurbciicn Sie 
Per eingebauter Hardcopyroii 


THE ESCHUEGE TIMES 


'<Z>' 


frei und unirJiunden 


Sonderausgabe 14.7.91 


HUND NIT ACHT BEINO NEUES DTP-PROGR.AHH 




' 


FREIBIER FAULPELZE ENTLASTET BUNDSTAGE 




Kuehomat: Verwaltung allei privaten Finanzen auf kaufmännischer 
Basis nnl allem Komfort Komplette Übersicht über Aktiva mul 
Passiva, Konlcnrahmcn mi; insgesamt 
28 Konleo — auch Wertpapiere uitil 
Optionen, Steuern. Gebühren. Ab¬ 
schreibungen und Zinsen weiden er¬ 
laßt. Jahresabschluß, Dua.korausg.ihc 
ItirGci-ami- und Vcrmögcnsübcrsiclii. 


Haiislialtshitanz: Erfassen Sie Ihre 
laulendcn .Ausgaben und stellen Sie 
fest, in welchen Ucrochcndte Kosten- 
lawinc am schlimmsten wütet Über 
siehtlielle Tabellendarslellung. 

blilzselineller Überblick ülicr die fi¬ 
nanzielle Situation im laufenden Mo 
nai- Kinderleichte Mentlsteueiutig. 
Druckcrausgahe. 


C odex Vol. 6 

Eine besonders anspruchsvolle Sammlung hilfrei¬ 
cher Anwendungen für verschiedene Lebenslagen. 

Hest.-Nr. 266, DM 19,-* 


I iisketlinsysU'rn Die Junggcsucluc 
"cierlegcnde Wollmilulisatf, Von den 
Standaiü-Datei Operationen iFonna 
ncicn. Kopieren, Dirciaory-Monipu- 
latioocn) bis hin zum Diskcllen- 
oplimierer. Fite Reaktivieret und Rc 
lokaior ist altes eingebaut. Eine Werk 
bank lür die tägliche Arbeit mit 
Disketten und Dateien, Ein eigenes 
Bcmir/cmienü liißt sieh einklinken— 
eine Overlay-Dalci mil entsprechen- 
der Schmilslclle isi dabei. 


Platine-Master: Ein sehr aufwendi¬ 
ges Programm z.ur tieslallung von 
Lciteiplaiteu, Joystick Bedienung 
mit Icons. Fadcnkivuzcumir. Masken 
fül IC Fassungen aul Abruf, Bc- 
sclirillung. Kopieren von Bereichen, 
abschaltbares ililfsraster. Druckaus- 
gabc in zwei Größen 


PrograMMsanMlung 

Der Datengarten 

Hit der zusätzlichen Portion 


Terminkalender Speichen liir jeden Tag einen Tcxtbildschinn. 
Audi lür Tagebuch oder Besuclispiolokollc geeignet, Mcnügcslcu- 
ert. mil deutschen Umlauten. Druckcrausgabc. zahlreichen Editor 
fuuktionen. Hilfebildsrhitm. 

Magic Synthesizer: llüll- 
kurven und Tonschwcbun- 
gen erzeugen lllr misgcfciltc 
Sounds mil dem Soundchip 
des CPC Grafische Darelcl- 
lung der I liillkmven. Sduiu 
für-Sdiiin-Editieren durch 
numerische Fingnbc mög- 


[f 


ebrauchsnutzwer 


3-Zoll-Diskettc [euoijmMtui 3 j 3 


ajcM^jos 


3*# uor. e^seg sug 


-iTMQ 


e i q 


lieh. Erzeugt Basic-Code für die Verwendung iter Sounds in eigenen 
Programmen Demo-Melodie zum Ausreden eingebaut 
Fußball-Verwaltung: Von der Bundcsliga bis z.ur zweiten Krcisklas 
sc — dieses sehr umfangreiche Programm verwaltel alle FußKilIer- 
gebnisse komlörtahel und crleichien Tippern die (Jhctsichl. Freie 
Eingabe und Abspeichem von Ligen und Spiclplüncn Das Pro 
gramm lllvnrtlgt die einzelnen Paarungen in die Ergchniseingabc. 
Die Fabeilcn lassen sieh anzcigen und auf dem Drucker ausgeben. 
Umfangreiche siatlslischc Auswertung. 

I.olto-Cnmmandcr; Erlaubt die Aufstellung und Ctewiimkoilircille 
jeweils eines Scrvice-Schclus der Spiele “f> aus l<J" und "Spiel 77" 
für mehrere Wochen tliesoinlcrs preisgünstige Ttppmclhodc). 



Diskettenhüllen-ßrucker: Drutkl Inhaltsver¬ 
zeichnis. Archivmimmcrund Dalum aut Müllen 
für Zoll Disketten. Für Epson kompatible 
Drucker. 

Aufkleber-Editor Zur Herstellung professio¬ 
neller, klebefemigcr Eiikctten für 3-Zoll*Dis- 
ketlcn. Sehr aufwendig aufgcmiK'lu "Whacyou 
sec IS What von get" Hat-, Kursiv . Mager 
Schrift, doppelt hohe, breite, unterstrichene und 
kopfstehende Schrift. Gleichzeitige Verwen¬ 
dung von 3 Zeichensatzen mOglicli. Mii einge¬ 
bautem Zcichensalz-Editor. Für Epson- 
kompmihte Drucker, 












































Die Power-Software von CPC Am- 
strad für CPC und PCW Joyce ist 
unter Kennern bereits ein Begriff, 
und unser Sortiment wird Monat 
für Monat gepflegt und erweitert. 
Und vergessen Sie nicht: Soft¬ 
ware von CPC Amstrad ist auch 
ein Geschenk, das ankommt. Nut¬ 
zen auch Sie die Vorteile von 
CPC-Amstrad-Software 

• preisgünstig 

• bewährt 


• praxisgetestet 

Zur Erinnerung: 

Meine CPC- und PCW-Joyce-Soft- 
ware wurde bestellt am 



CPC-Amstrad-Leser sind immer 
top-informiert. Daher sollte Ihnen 
kein Heft oder Sonderheft in Ihrer 
Sammlung fehlen. Das Eintippen 
von Listings und Programmen er¬ 
sparen Sie sich durch unseren 
günstigen DATABOX-Service. Im¬ 
mer gut beraten sind Sie mit CPC 
Amstrad 

• Sonderheften 


• DATABOXEN 


• Sammelpacks 

Zur Erinnerung: 

Meine Hefte, Sonderhefte und DATA¬ 
BOXEN wurden bestellt am 



Wollen Sie etwas aus dem Com¬ 
puterbereich tauschen, verkaufen 
oder erwerben, dann schalten Sie 
doch eine Gelegenheitsanzeige in 
unserem Kleinanzeigen-Markt. 

Dabei können Sie bestimmt so 
manche Mark sparen und ein gu¬ 
tes Schnäppchen machen. Ihre 
Chancen nutzen Sie konsequent 
mit 

• Gelegenheitsanzeigen 

• Kleinanzeigen 

• Gewerblichen Angeboten 

Zur Erinnerung: 

Meine Kleinanzeige wurde aufqeqe- 
ben am 



DM 

3“-Diskette 


DM 

, - 

□ 

215 

Volume 1, Charakter-Designer 

49,- 

• ” 

□ 

216 

Volume 2, Dateiverwaitung 

49,- 

,95 

n 

217 

Volume 3, GSXplot 

59,- 

,95 

□ 

219 

Volume 4, Bild-Editor 

49,- 


— 

220 

Volume 5, Datenbank 

69,- 


— 

221 

Volume 6, Tabellenkalkulation 

59,- 


z 

222 

Volume 7, Grafische Benutzeroberfläche 

69,- 


□ 

194 

The Player’s Dream Vol. 3 

19,- 


□ 

195 

The Player’s Dream Vol. 6 

19.- 


□ 

265 

Codex Vol. 5 

19,- 


□ 

266 

Codex Vol. 6 

19,- 


p 

269 

CPC-Highlights 1 

49,- 

, - 

□ 

270 

CPC-Highlights II 

Anwender-Spiele 

49,- 


□ 

193 

Joyce Highlights 1 

29,- 


□ 

264 

Joyce Highlights II 

29,- 


DM Gesamtbetrag: DM 



CPC-Sonderheft 
DM 14, - 


DATABOX 

3-Zoll-Diskette 


I 


I 

I 


309 Nr 3/86 
Nr. 5/87 

312 Nr. 6/88 

313 Nr. 7/88 
Nr. 8/89 


C 319 DM 29, - 
i 334 DM 38. - 
L 340 DM 38, - 
II 3135 DM 38.- 
L 3142 DM 38.- 


Kombipack 

Sonderheit + DATABOX 
3-Zoll-Diskette DM 29, - 
ZI 3044 

Heft ausverkauft 
_ Li 3046 

LI 3047 

Heft ausverkauft 


Lösungsansätze, Programmierhilfen 
und Anwendungsbeispiele, die immer 
aktuell bleiben. 


Gesamtbetrag: 


DM 



e Zeile, zzgl gesetzlicher Mehrwertsteuer, 
chbaren CPC Amstrad für 

werbliche Anzeigen werden mit G gekennzeichnet) 
-eiben!) 


_U 


1 1 I I 

1 1 1 1: 1-1 1 

1 1 1 1 1 1 1 


1 

1 1 U 



1 1 III 


iil l 

1 J ! 

| 1 

III 1 

,;i 1 i l Ml i L 

1 1 i_U 

| | | | | | | 


1 

LU _1_L 1 


), Chiffre-Gebühr 10,- OM inkl. M'.vSt zzgl zum Anzeigenpreis 
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Das Beste von RE-Sottware: 
Ausgewählte und geprüfte Qualitäts 
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Jetzt exklusiv zum Lächel-Preis 


Wie wär’s denn damit: 

The l’luyer’s Dreum Vol. 3 


Eine Sammlung besonders atlraktiver Spiele, pro¬ 
fessionell programmier! und mit delailreicher Gra¬ 
fik ausgestattet. BesL-ISr. 194, DM 19.-* 

Kitter Kunibert: Eines der witzigsten Reiiklionsspielr Ihr den CP< 
tcm|»j!L‘ladcri uml mit «Icmilreither Farbgrafik Verheilen Sie Kuni¬ 
bert dazu, SpmiijL Uli Sptwig Ute Burg seines Erzfeinds zu Münncn 
Vorsicht: dieses Spiel macht süchtig: 

Klinik un Labyrinth: Ft was lUi Freunde gcpllegun Hektik. Minen 
in einem Rieseulubyriulh mit bcruni/appdndcn und nniliei wischen 
den EnergieIressem crwaehl Ihre Spiellu-.iir Und jetzt gilt cs. cm 


knappes Dm/cnd Schlösser /. 
blitzschnelle Bi Id Wechsel mul • 


Finden 

.•idemve 


Bulldozer Eine plilTigc Mischung aus“ 
mit liebevoll gestaltetet Churactot-Guili 

Kroggie: "Tierisches'' Junip'n-Run-Spi 
Für I udei 2 Spieler simultan. 

Siift-Ball: Hin Hipper uiii zig vcrschii» 
— für alle, denen Arzt oder Ehefrau de 
Ecke verboten luhen, 

llow Junes: Ein grafisch aulgepeppies I 
Kaulen Sic Atari. IBM oder Ainsirad 
verlieren Sie Hans und Hol 


The Player’s üream Vol. 6 

Ein Paket besonders anspruchsvoller Spielpro- 
grammc, die nie langweilig werden — mal flott und 
kernig, mal tiiflcIiiilensiv.Best.-Nr. 195. DM 19,-* 

Snko-Bun ( onstrucliir Eine Hcrnusfordcniiig Dir Ihre kleinen 
grauen Zellen Finden Sie die richtige Vorgelicnswcise Dir jedes 
Spiellevel, Mit Bildschirm Editor zum Gestalten und Ahspeiehcm 
cigenei Iwvels Find Levek weiden ntilgeliefen. Achtung' .ihsiilutes 
Sucliispiel, der Effekt isi T.cmniings '-ahnlich! 

Air Trafik Control Koordinieren Sie den Luflverkchi /svisciieu 
acht eumpäisehen ITughäfen! Verhindern Sie Zusammenstöße, in 
dem Sie den Piloten die richtigen Informationen gehen, Aufregende 
Simulation int Grafikinodc 2. 

Trouble in Space: Strategie und Tempo in einem (asziuiereniieit 

Spiel vereim, Hier wird nicht geballert, sondern mit kilblcm Kopf 


eilte Bjltn liir einen Space Scootei gebt 
tiuu.detailreiehe Grafik. .Mit Iztvcl-Edit 

Super Rultik's < tilie: Der Iteriihiulc 
Bildschirm. Mit Spiegeln für die verdeck 
de verzwickter KombinaikHi. 

Alien Attack. Audi das klassische Ball 
darf nicht fehlen. Diese "Space Ittvadcr 
ihre liebevoll gcstallele Gratik 

Olk T'cmporeichcs, “Pacman” imiges / 
niicriei , butterweicher Spritc-Gralik und 

Dallas Oil Vlairagcment Geselisclralis- 
Reizvoll durch ineinander verschachtelt! 

Reparatur: Flottes Tuklik-und Aetiiai-S 
Grafik. Beherrschen Sie das Schlaihtfch 

Gardner-Spiel: Koitthinalmit ist äuge 
Vektoren. Diagonale, senk oder wangi 
wcnlen auf einem Spicllekl manipulicit, 


( ode\ Vol. 5 


Ein Anwendcrpakcl für kühle Rechner uixl Freunde 
des geschriebenen Wortes. Bcst.-Nr. 265, DM 19.-* 

lestinaker Ein einfaches T'extverarheiluiigsprogianmi zum Briele- 
sdireilten. ßiiclkopfgesondert erfaßbar Bloeksalz, Datei-Manager. 
einstellhtuCr liihulatoi. Zcilcnbrcite luv 72 Zeichen. Deutsche 
.Schreibmaschinen Tastatuibclcguttg mit DIN Zeidicttt-alz. Busic- 
Prcierammiercr können die Routinen Dir deutsche Umlaute und ß 
ansktippeln und in ihre eigenen Programme cinhindcn. 

Paperniaker: Ein Mmi DTP-Prognunm für die Sehüier- oder Vcr- 
einszeuiing. Mehrspaltiger Text, Schlagzeilen und Xcilungskopf las 
seu sich frei aut der Seile plazieren. Einfache Geomelriegrafik tili 
Zeitungskopf- Köpfe, Sclilnezcilcn und Artikel getreu in speicherbar. 
Ausgabe Dir Epmm-kompaliblc Drucker Mil einer l)cm»-Zeitung als 
Beispiel, 


Typograph Mn diesem Progianmi cm 
Grafikschrilien auf dem Bildsehiim. Pet 
tine läßt sich die Schriftkunst mu h 
zu Papier bringen. Freies Skalieren 
und Positionieren der Schrifizei- 
chni. Ein kompletter foul im "We¬ 
stern Daik" wild miigeliefen — 
damit Sie gleich loslogen können. 

Multllrniner Ein koml'ortnbles 
Lern Ülmngs und Test Pto 
grantln flii Ivliehige Multiple- 
Choicc-Aufgabcn 
beispielsweise Fiihrersehciitfragcu. 
PrUfuiigsaulgaheii- Checklisluit 
oder Psycho-fcsls. Ergcbnisprolo- 
kolle speislierhai. Zcilrahincnübei 
Prüfung! eingebaut. 


Codex Vol. 6 

Eine besonders anspruchsvolle Sammlung hilfrei¬ 
cher Anwendungen für verschiedene Lebenslagen. 

Best.-Nr. 266. DM 19,-* 


Terminkalender Speichert liir jeden 
Auch für Tagebuch oder Bestichsproiok 
erl, mit deutschen Umlauten. Druckern! 
fuukliouen. Hiltcbildschirm 


Diskeltcnsvsteni Die langgcsuchie 
"cietlegende Wollmikftsau". Von den 
Stand Jtd-Daiei-Operal innen (l'iirma- 
ticreu. Kopieren. Directory Mauipu 
hü tonen l bis hm zum Disketten 
optimieren File-Reaklivicrer und Re- 
InkatoriNt aliescingcluul. Eine Werk 
bank Iür die tägliche Arbeit mit 
Disketten und Dateien Ein eigenes 
Hcntiizermcnü i.'ißtslcheinkhnkcn 
eine Overlay-Datei mit etilsprcchcu 
der Schnittstelle ist dabei. 


Platine-Master Ein sehr aufwendi¬ 
ges Programm zur Gestaltung von 
I .eitcrp lat len Joystick- Bed ien utig 
mit Icons, Fadenkreuzeuisor, Masken 
!Ui IC-Fassungen auf zMtruf. Be 
sehriftung. Kopieren von Bereichen, 
abschaltbares HiUsrsstcr Drnckaus- 
eatx- in zwei Größen. 


PrograMMsaMMlung 

Der* Datengarten 

Nit der zusätzlichen Portion 


[f 


eörauchsnutzwer 
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C^Amstrad 

INTERNATIONAL 

\ 


CPC • PCW JOYCE 


Software 

für 

CPC und PCW Joyce 

erwerben Sie im 

Bestellservice 

preisgünstig 

und 

schnell 


C^Amstrad 


c 

1 NTERNATIONAL 


| CPC • PCW JOYCE j 


Information 


über 

CPC und PCW Joyce 

sammeln Sie mit 

• Einzelheften 

• Sonderheften 

• DATABOX 


Amstrad 

yjfea | N,T 6 R NATIONAL 

■MiMiIHVglI’ W 


Kleinanzeige 

Eine Gelegenheitsanzeige in unserem 
Kleinanzeigen-Markt macht sich immer be¬ 
zahlt, ob Sie tauschen, verkaufen oder er¬ 
werben wollen! 

Und so wird's gemacht: 

Kreuzen Sie bitte an, in welcher Rubrik Ihre An¬ 
zeige erscheinen soll und ob Sie privat oder ge¬ 
werblich isl. Dann schreiben Sie Ihren Text so 
in das vorgezeichnete Feld, daß jeder Buchsta¬ 
be, jedes Satzzeichen oder jeder Wortzwischen¬ 
raum ein markiertes Kästchen ausfüllt. Jetzt 
brauchen Sie nur noch die Zeilen zu zählen, den 
Preis zu berechnen, einen Verrechnungsscheck 
auszufüllen, und fertig ist Ihre Gelegenheils¬ 
anzeige. 

Bitte beachten Sie! 

Aus verwaltungstechnischen Gründen kann der 
Abdruck Ihrer Kleinanzeige nur gegen Vorkasse 
erfolgen. 
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3“-Diskette 

Kassette 

DM 

□ 

207 

- 

ConText CPC, Textverarbeitung 59,- 

C 

262 


Der Finanz-Fachmann 

49,- 

□ 

202 

- 

CopyShop, Hardcopy-Programm 49,- 

IJ 

267 


Lernen mit Spaß Nr. 1 

24,95 

J 

268 


Lernen mit Spaß Nr. 2 

24,95 

1 

214 

- 

Turbo Data CPC 

69,- 

□ 

205 

- 

Special Öfter 2 

59,- 

c 

263 

— 

Der Schlüssel im 
Maschinenraum 

49,- 

□ 

213 

- 

Software-Experiment 

39,- 

□ 

209 

- 

FaBaCom, Basic-Compiler 

49,- 

□ 

104 

- 

Startest 

19,- 

□ 

196 


Puzzle - make it 

15,- 

□ 

1011 

- 

Fantastic Four, Spielesammlung 





29,- 

□ 

107 

- 

Special Offer 3, Spielesammlung 





39,- 

n 

1369 

- 

Faszination 3D 

39,- 

□ 

1012 

- 

Game-Box III 

29,- 

□ 

106 

- 

Know CPC 

29,- 

□ 

211 

- 

Fraktal Generator 3D CPC 

49,- 


Porto/Verpackung 

(Inland 4.- DM. Ausland 6, - DM) _ DM 


3"-Diskette 

DM 

□ 

215 

Volume 1, Charakter-Designer 

49,- 

n 

216 

Volume 2, Dateiverwaltung 

49,- 

1.1 

217 

Volume 3, GSXplot 

59,- 

□ 

219 

Volume 4, Bild-Editor 

49.- 


220 

Volume 5, Datenbank 

69,- 

□ 

221 

Volume 6, Tabellenkalkulation 

59,- 

1.1 

222 

Volume 7, Grafische Benutzeroberfläche 

69.- 

n 

194 

The Player's Dream Vol. 3 

19,- 

□ 

195 

The Player’s Dream Vol. 6 

19,- 

□ 

265 

Codex Vol. 5 

19,- 


266 

Codex Vol. 6 

19,- 

n 

269 

CPC-Highlights 1 

49.- 

□ 

270 

CPC-Highlights II 

49,- 

□ 

193 

Anwender-Spiele 

Joyce Highlights 1 

29,- 

□ 

264 

Joyce Highlights II 

29,- 


Gesamtbetrag: _ = ^ === _ DM 


Einzelhefte und DATABOX 


Einzelheit 

Ausgabe 

6,- DM/Stck. 

CPC 
Kassette 
14.- DM/Stck. 

CPC 

3"-Diskette 
24.- DM/Stck. 

Joyce CPC-Sonderheft 

3''-Diskette DM 14.- 

24,- DM/Stck. 

DATABOX 

3-Zoll-Diskette 

Komblpack 

Sonderheit + DATABOX 
3-Zoll-Diskette DM29.- 

i'87 bis i ras 
(Bitte eiriiagen 


□ 

□ 

r 309 Nr. 3/86 

1 319 DM 29. - 

□ 3044 

Nr. 6/87 

r. 334 DM 38, - 

Heft ausverkault 

1 '89 

- 

□ 

□ 12 312 Nr. 6/88 

L 340 DM 38, - 

□ 3046 

2'89 

□ 

n 313 Nr. 7/88 

J 3135 DM 38,- 

fl 3047 

3B9 

ü 

C 



.... . 

4'89 

J 

r 


5'89 

- 

J 

□ 

Lösungsansätze, Programmierhilfen 
und Anwendungsbeispiele, die immer 
aktuell bleiben. 

6'89 

□ 

U 

□ 

7’89 

□ 

U 

□ 

8'89 

C 

L 

□ 

9'89 

c 

L 

□ 

10'89 

c 

L 

□ 

□ 11 '89 

c 

□ 

□ 

J 12'89 

□ 

ü 

□ 

□ 1 '90 

□ 

□ 

c 

Z 2'90 

□ 

Z 

r 

J 3'90 

□ 

J 

G 

4'90 

□ 

□ 

□ 

U 5'90 

□ 

□ 

□ 

L 6/7'90 

- 

( 

□ 

L_ 8/9'90 

- 

L 

3 

L 10/11'90 

C 

L 

□ 

U 12/1 90/91 

□ 

ü 


2/3’91 

n 

U 

"1 

6/7'91 

n 

L 

□ 

J 12/1 '91/92 

□ 

L 

□ 


+ Porto/Verpackung 

(Inland 4,- dm. Ausland 6 ,- dm) _DM Gesamtbetrag: _ _ DM 


Kleinanz eigen-M ark t_ 

Private Anzeigen: Nur DM 5,- je angetangene Zeile. 

Geschäftliche Empfehlungen: DM 8.- je angelangene Zeile, zzgl gesetzlicher Mehrwertsteuer 
Bitte veröffentlichen Sie meine Anzeige in der nächsterreichbaren CPC Amstrad für 
□ private Zwecke [ J gewerbliche Zwecke (gewerbliche Anzeigen werden mil G gekennzeichnet) 

Das ist der Text: (Bitte deutlich in Druckbuchstaben schreiben!) 



In dieser Rubrik: 

□ Biete an Suche Tausch Z Stellenmarkt/freie Mitarbeit 
I Hardware □ Hardware Geschäftsverbindungen 

IT Software □ Software Verschiedenes 



Mi4/6I28) 
mt'PC laui raliip 

■ii liii N.iditulcpni 


ffll CPC 4M 
i.i ■ Arithmetik 
•ISIuli RAM-Pisk 
cilnn geilul/l wcniuii 
diwogruimnc 


J * * 


fand E 24 
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i j 3 .Amstrad 

*C 


I NTERNATIONAL 


CPC • PCW JOYCE 


CPC-/PCW-Joyce-Bestellservice 

DaS B J3j ich mache von Ihrem Angebot Gebrauch und bestelle die umseitig 
ausgewählten Produkte. Bitte liefern Sie an folgende Anschrift: 

Ausge 




mi 










J ^ 3 , , 
' S i;lf< 


«- •.», 


: t .„,:,.. t . 
M*si«* ( ** 










■ - .- *;, 


.C j 


Mir* r:; 


•Iw 1 




/jff 




Name 


Jetzt i 

Wie war 

The Plaver 


Eine Samntlur 
fcssioncll prog 
fik ausgestatte: 

Killer Kunibert E 
icmpogclaiieii und i 
Ivri dazu. Sonnig! 
Vorneh: dieses Spi 

Panik im I .abjrini 

ui einem Riesen lab; 
den EuergicIVcssen 

The l'laver 


Ein l’uket be 
gramme.dic ni 
kernig, mal tiif 

Soku-Hiui CTmstr 
grauen Zellen r-ni 
Spiellcvc! Mit Bili 
eigener Level». Hin 
Sucht spiel. der Elk 

Vit Iraflic t.'ontn 

uchi europäischen 
ilcm Sie den Pilnlei 
Siinulaliou nn Gml 

Trouble in Space: 
Spiel vereint liier 

Codex Vol. 


Ein Anwender 
desgeschriebe 

levlmaker Ein eil 
schnullen Brlelkuj 
emslcHbiircr liibu 
Schreibmaschinen 
Programmieret kin 
uuskoppeln und in 

Pupcrimiker. Eni 

emszcliuiig, Mehre 
sen sich Irci auf <k 
Zcituiigsknpf. Kfip 
Ausgabe l‘ü: Epson 
Beispiel, 

Ctidex Vol 

Eine besondet 
eher Anwcndi 
Best .-Nr. 266. 

ItisketU'nNVSU’r» 
'ncilcecmlc W.illn 

Staiklaid-Datei Op 
licicn. Kopieren, I 
laiioncn) bis hin 
optimiere;. File-Re 
lokalor ist alles ein; 
bank flii die tilg 
Diskcuen und D.r 
Ucmn/CTiiK-nii läßt 
eine Overlay-Date 
der Schniusiclle isi 


Platine-Muster: I 

ecs Programm zu 
Leiterplatten. Ji 
mit Icnris. Eadenki' 
für IC-Fassungen 

sdiriltung. Kopier 
abschaltbares Hill 
nahe in zwei GrtW 


Straße/Postfach 


PLZ/ORT 

□ Den Betrag bezahle ich mit dem beigetögten Verrechnungsscheck. 

C Ich bitte um Lieferung per Nachnahme zuzüglich der Nachnahmegebühr 
(nur Innerhalb der BRD), 


Unterschrill (bei Minderjährigen des gesetzlichen Vertreters) 


C-*Amstrad 


2 




I N TERNATIONAL 


CPC • PCW JOYCE 


Einzelhefte 

Ja, ich mache von Ihrem Angebot Gebrauch und bestelle die umseitig 
ausgewählten Produkte, Bitte liefern Sie an folgende Anschrift: 


Name 


Straße/Postfach 


PLZ/ORT 

L Den Betrag bezahle ich mit dem beigefügten Verrechnungsscheck. 

C Ich bitte um Lieferung per Nachnahme zuzüglich der Nachnahmegebühr 
(nur innerhalb der BRD). 



Unterschrift (bei Minderjährigen dos gesetzlichen Vertreters) 


C-* Amstrad 


I NTE RNATIONAL 


Kleinanzeige 

Bei Angeboten: 

Ich bestätige, daß ich alle Rechte an 
den angebotenen Waren besitze. 

Name 

Straße/Postfach 


Bitte 

ausreichend 

frankieren 


DMV-Verlag 
CPC International 
Postfach 250 

W-3440 Eschwege 


Bitte 

ausreichend 

frankieren 


DMV-Verlag 
CPC International 
Postfach 250 

W-3440 Eschwege 


Bitte 

ausreichend 

frankieren 


DMV-Verlag 
CPC International 
Postfach 250 


PLZ/ORT 

□ Den Betrag bezahle ich mil dem beigefügten Verrechnungsscheck. 


Dati m Unterschritt (bei Minderjährigen 'des gesetzlichen Vortroleis) 


W-3440 Eschwege 









































FAst BAsic 
COMpiler 


Der Turbo-Antrieb für Ihre 
Basie-Programme! 

Haben Sic sich schon immer gewünscht. ilali Ihre Buk-Programme auf 
dem CPC schneller laufen? 

Mil «kn» FABACOM-Rasic-Compilei- wild dieser Wunsch Wirklich 
keil; Compilicrtc Basic Programme hrnuchcn weniger Plal/ und laufen 
schneller ab weil sie mein ständig den Basic Interpreterals "Klotz am 
Bein" mil ilahci haben müssen. Schulzen Sie den (,'odc Ihrer Programme 
vordem Zugrifl Neugieriger, indem Sic Maschinenprogramme daraus 
machen I 


■ VollerSprucliumlang von ( PC Basic l.l (6M/6I2HI 

■ Die cuinpilierieii Programme sind auI jedem CIA’ huillliltie 

■ Separale Compilierung von Programm teilen für Natliladcpm- 
gnunme 

■ Fitst alle Befehle von CPC Dask 1,1 auch für CPC 1d l 

■ l.nieiMUi/nng von Integer und I'ließkoininn-Ariilinvciik 

■ Kompui ibcl zur Vor lex Peripherie cmsclilicUlieh KAM-Disk 

■ Alle CP/M-Diensl Programme können « citciinn genutzt wenleil 

■ Deutsche Bedienungsanleitung und Beispiclpiogriiinme 

Rest.-Nr. 200. DM 49,-* 



Know CPC 

Interessantes l ; rage- und 
Antwortspiel für die ganze 
Familie 


Aus einem Fragenfundus mil iinlerschk’dli 
dien Wissensbereichen slcllt ein (tisiig ani 
micrrcs Kettchen Qui/frageti Bis zu l 
Spieler machen mit. Walilsveise Anpassung 
tut Grün- oder Farbmonitor, Editoi für eige¬ 
ne Fragcnsiit/c dabei 

Bwt.-\r. 106. DM 20,-» 






Zwei Super-Spiele mit zwei 31)- 
Brillen für Spielspaß zu zweit 


31)-Light Cycle 

Das belieble “l.ichircwner" Spiel aus dem l-ilm " fron" in 
einer holographischen Version für zwei Personen! 

3D-Labyrinth 

Dmeli das Anaglyphen-Holograpliieverlaluen waebsen die 
laibynmhssdndc quasi aus dem Bildschirm heraus 

Für alle CPC 464, 664. 6128 mit Farbmonitor- ' ID-I igln 
Cydc" kann in 2D-UiilMollung auch auf Griimnonitor gc 
sptcll werden. 

Best.-Nr. 1360. DM 30,-* 



Fantastic Four 


Star l est 


Vier Superprogramme zum Minipreis 


tV/i'tmifnr 
Tel nimmt / 

Fruiis 
lemiiHiul II 

Kcsi.-Nr. 1011, DM 20,-* 


Wcllraum-Aclimt 
Science-Fiction 
Gesell ickltchkctl 
Tcxlodvenlure 


Spccial Öfters 111 

Neun Spielprogramme für alle CPCs 

Stirn und der /.oubcntnh Areade-Advcnlurc 

Dir Fyiumlde — Tcstabcnleucr mit Aciian-Elemcmcn 

l’u:;le — Zerstreuung fUr den Peicrahcnit . 

Black Jack — das k lasstschc Kartenspiel 

Außerdem: Orion, Memory, 1-ahyiinih. /Jck Aach. SUdnmJahn 
2 Disketten, Bext.-Nr. 107.1)M .19.-* 


Action-Advenlure für alle C'PCs 

I!esl.-Nr. 104, DV1 10,-" 
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□ 



Game Box 3 

Für jeden das richtige - v icr ausgesuchte Top-Spiele litrCPC 
I Alpluijel: Wclirjum-Actionspicl mil tollen Effekten 
I Telrpnnanin; Science-Fiction um ganz, neuer Spiclidcc 
■ Kamp! den luxeklen erlebnisreiches Gesell ick I ich kei tsspicl 
I hmbomeer. Farbenfrohes Spiel mil eigenem Bild-Editor 
Best.-Nr. 1012, DM 20.-* 


CPC-Fraktal-Generator 31) 

Vom Maschinensprache-Virtuosen Matthias liphofl 

hdeben Sie den Zauber mathematisch erzeugter Lundsdialicii' 

I BlllZselmelle Gralik-lir/cugung: I»er I raktul Generator CPC 
wuide äußersteffizient ln Assembler piugrammieil. Intelligente 
Hcrerhllimgs-Rouliilen sorgen für enorme Zeitersparnis. Sie 
können zusehauen. während sich ilte liaklulcn Seen und Gebir¬ 
ge zügig aulbiiucn! 

I Mandclbrul- und Juli.imcnec. mil automatischer Glällungs 
lünktion 


Der Schlüssel /um Maschinenraum 

Ein CPC-Mega-Satnpler. voll mit Werkzeugen 
für den Assemblerprogrammierer auf dem CPC 

liier linden Sie die besten Tools aus sieben Jahren PC International” - 
vom KSX-Managcr über .len Speicher-Debugger bis /.um komplcncn 
Assembler Ob Sie unter AMSDOS oder CP/M arbeiten — hier ist 
liestimml auc h für Sie etwas dabei, daü Ihnen /eil und Mülle sparen hilft. 


H Sttifenlöscr vertikaler Blickwinkel: wahlweise Sicht von oben. 

unten, schräg und in der Toialcn einzeln und slnfenlos einstellbar 
I Bequeme I landhubung Uber Pulldown-Menüs mil deutscher Be 
nut/erfühmng 

Vier Bildet körnten beim hl 2X gleichzeitig im Speichergeholten weiden 
Die erzeugten Bilder lassen sich mil handelsüblichen Malprograninien 
weilcrvcmrbcilen und in eigenen Programmen als grafische Hinlcrgiün 
de dnseizcn 

Durch Inckieichc Farlirastcniug erzeugt der Fraki.il -Genei altu aut dem 
CPC ui Mode I zehn verschiedene Farbtöne gleichzeitig 

BesL-Nr. 211, DM 40.-* 


Aus dem Inhalt: 

I Maschinensprnehemuiiiuir mil Disasscinhlei 

I Ramdisk -Programm für 612X in Assembler 

■ I iii Iki Relocaior: das t Irgamsationsgeioe lur den Speicher 

■ 'TA.STM": Beschleuniger Bit Mole I-Bildscliinmiusgahc 

H Maschinensprache. (tiliiypakcl lauer I II ' Linken. Veisgluc- 
ben. Dokumentieren uralRSX Munugenienl 
I Ctilily flu Pseudo-Midlliaskmg 
Insgesamt über 30 Programme. Ilest.-Kr. 263. DM 40.-* 
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Spielend 
den CPC 
beherrschen 
lernen 


Insgesamt 17 Programine.mil IKOsciligem deutschem Il&ndbucli. 

Wnnlmasler Sie raten ein Wort, das litt CI'C sich ausgcdachl luiL Dann 
rät der Rechnet. Wer biauelit »eiliger Versuche.' Sic »erden staunen.. 

Das Spiel fies Iebene: Der CPC erzeugt nach den Regeln des natürlichen 
Wachstums phantastische, kristalline Strukturen. Ändern Sie die Voraus 
Setzungen und sehen Sie. wie neue, nie dagewesene Formen entstellen. 

Mil rnher Rechcnpcwalt: Mil dem "Brate-Force"-Algorithmus darf der 
CPC su richtig loslegctt und spielt In dem alrihanischen Strategiespiel 
"Kalaha" alle Gegner an die Wand oder können Sie ihn schlagen? 




laillMiklm/^ ihil/e Iiine gut ausgeslallete Simularion verset/.l Sie in die 
l äge eines Entwicklungshelfers, deremc Hungersnot ab/uwenden ver¬ 
sucht Aber llmi Mittel sind begrenzt... 

Der CPC als Sn (Hege: Ein ralliinenes System von Spicl/ugbe wen ungen 
macht den CPC zu einem Inst unschlagbaren Gegner im Gobang Spiel, 
der Ihnen anfangs saftige Niederlagen bescheren wird. Das Programm 
ist natürlich dennoch zu schlagen - abet wie? 

Der Computer lerill: Erichen .Sie ein Paradebeispiel Ihr "Künstliche 
Intelligenz"; Das Programm “Minischach" ist lernfähig und »int mit 

jeder Partie ein bißchen besser. 

Das Ökologie-Experiment Der Computer zeigt Ihnen ui animiencr 
Farbgrafik einen simulierten lehcnsrattm mit Weideland, Schafen und 
Wölfen. Erforschen Sic tlie ökologischen Gesel/itiußigkeilcn und schal 
len Sie ein stabiles, natürliches Gleichgewicht. 

Atillcnlcm: Grafit mii Komplexen Zahlen, Wordkearn-Rälsel Geheim 
msse iles Pasadschen Dieieeks 


lksl. br. 213.1)M 39,-' 


Programmierte 

CPC- ,, Evergreens M 


Zwl'i Disketten mit echten Klassikern für< P< 464,664 und 
61281 Diese Ptogrammc stellen ansgevvaldk' I li'liepimkn* iku 
lelzaen Jahre dar, tedes einzelne .int seine All etwas ganz 
Besonderes, 


CPC-Highlights I: Spielc-Klassiker 

Cave llif-lii nlas ec lue 'Dclcmler -Feeling knlliiul zutuckli, 
Mini Mnze <Verwirrspiel in drei Dimensnineui. Ihn,in Rim 
(schnelles Aclion-Spiel mit l.evel-Designeri, Panik im tatin 
Express ispannemk- Rnrnheilsuehe). Ca/ilei ilhihschtaiilvr 
Geschieklicltkeitsspiel). Hi muiltomhe CPucuiuu" laßt gi tilVii l. 
S/iatT Taxi (Spil/.en-iump'u-Kun mit Sctvcii-lüluorl, Sehhinpt 
tGeselliekliehkeitsspiel mit Gcsvölmuiigs Effekt). .<-/> Mahl, 
(echter Hit' Schlagen Sie den Computer.’l. Spat e Gluler < > l> 
Science-I icitiin mit Spil/cn-Gralik). Bc.stell-Nr. 269. DM 4M.- 

CPC-Highlights 2: Anwendungen und I llilines 

Kimia-Capv (fälliges Track-Analyse- mul K« ipivrpiI mrumiit. 
Easy Pnnter (Kreativ-Paket für GrullkarlCn lind Seiteugesial 
Ittngk Digit Exlensinil (Sprache soltwareitiiißtg digitalisieren 
mit dem Datcnrceotder). Miiskengenerntoi tlur eigene Alvfra- 

gebildsclhrmc). Jinsiiek IVrru , (Sin k I . . (in Ciiimii 

lasten). Mllliilos (Disk-Ctilily). InlciitttH Musik <mit RSXcill. 
Srnren-Cimtpresmr (Speieherpl.ilzsparerl, thtusfer (von MS 
DOS zum CPC und zurück). Sn/H-imnn (Diskcilcitninniloi i 
/Jr.vrg/rtTlZoichcnsalzcciiemlni I. Itestell-Nr. 270. DM 49.- 
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Joyce-Bilcl-Eclilor 

Zum Zeichnen hochauflösender Grafiken 

Der Joyce ist mehr als ein Textvciuibcitungssystcm 1 Mit dem Joyce- 
Bild-Editor gestalten Sie komlorlnhcl hoc hau Dosende Grafiken. hin 
den diese in eigene Ptogrammc ein oder gehen sie aut dem 
Joyce-Drucker aus. 

Der Joyce-Bild-Editor erschließt die Grafikfähigkeitcii Ihres Joyce: 
Exaktes, pixelgenaues Zeichnen duich Normal- und Feinmodus. 
Lösch- und Invcrticrungsfunktion in beiden Bearbeittingsinodi, ein¬ 
fache Integration beliebiger Texte in die Bilde lememc, Option /.um 
Mischen von fertigen Bildern, Ausdruck möglich keil mit Randhc- 
slimmimg mit dem Joyce-Drucker, kompletter Quelllexl in Turbo 
Pascal 3.0 wind mitgelieferl. 

.loyce-Programimammlung 4: 

Bild-Editor, Best.-Nr. 2IM, DM 49,- 


Joyce-Busineß-Paket 

PrävnMlkmxgnifik und 'fbbellcntextverarbcllnng 
GSX-Phu die tfisuneffir Busineß Grafik auf dem Joyce 

Das Programm fertigt Balken und Kurvendiagramute an; es erlaubt 
auch die Herstellung von Strich- und Toxlgiallk. Die ßemitzcrfdli- 
ntng ist mcnügcslcuerl Die fertigen Grafiken lassen steh auf Bild 
schirm und Drucker ausgehen 

Tel,floh piazien lh,r TextemillimelerKeimii 
B Komplette Meiulsteucning w ie von LocoScripl gewohnt 
■ Wahl von Seitenlange. Zcrlcnahstand und TalHilulilrcn 
I Individuelle Bestimmung von Schriflvveilen und Schriftarten 
I Textli bei nähme von LocoScripl oder im ASGII-Focnul 
Joyce-Programrnsaminliing 3: 

Busineß-Paket. Best.-Nr. 217. DM 59,-“ 


GCPM — die grafische 
Benutzeroberfläche Ihr den Joyce 

Schnell, bequem und komfortabel 

Der ganze Komfort moderner L'omputerei — einschließlich 
Maoslicrlienung. Uhr, Taschenrechner, Schnillslcllonslciieriing, 
Passwortllbfrage und vielem mehr. 

I Steuern Sic alle Funktionen Ihres Joyce wahlweise ither 
Maus Otter Tastatur, 

■ Arbeiten Sie mit der Darstellung uller Dateien in Tahcllen- 
fortn (ähnlich LocöScript) und den Slandanlfunktinncu wie 
Kopieren, Unilxmeuneu und Löschen, 
fl Aul hts zu drei I juifwcrkcn stellen Sic PanmtcWr, Suchpfa¬ 
de (ohne SETDLE) und das temporäre I .tmfwerk hclichig 
ein. 

I Vcrindem Sie Dateiatinbute. und rufen Sic Programme di¬ 
rekt von GCPM aus auf. 

B Nutzen Sie die Funktionen zum Verschlüsseln und Kompri¬ 
mieren von ASCU-Daietcn sowie die optionale Passworlab- 
fmgc 

B Sputen Sie Zell durch den integrierten Taschenrechner mit 
Zwischenspeicher. 

B Verändern Sic beliebig die Griindeinslcllung.cn der Schnitt¬ 
stelle, des Zeieliensatz.es. der Tastatur, der Vlaus, der Disket¬ 
tenlaufwerke und des Druckers. 

B Ein Screensaver stellt den Monitor liei Nichtgebrauch dun 

kcl. 

Mil dem GCPM -Starterset als Installationspmgramin unil ileni-IBsci- 
tigen. reich liehildeiten llandbueh im Handumdrehen bringen Sic 
den Komfort der “Großen" im I lumlumdrehcn auch aut Ihren Joyce. 
.lojee-Programmsammlung 7: 

Grafische Hcmit/croberfluclie, Best-Nr. 222. UM 69,-* 


Joyce-Tabellenkalkulation 

Die universelle Tabellenkalkulaüon für alle 
PCWs. Ob Monatsbilanzen. Steuerabrcch- 
nung oder Kontoführung mit diesem Pro¬ 
gramm sind Sic allen Aufgaben gewachsen. 

B Besonders schnelle Bensclitiuilgsalgoi itlmieit ftn die Fehler 
werte, übersichtliche Menü füll rung und Abfangen von Fohl 
cingabcn 

B Am Rjnd cingchleiidctc I ormcl mit hts zu 68 möglichen A’i 
elfen, eigene Befehle z.ur Verkürzung der Fönocln und 
Ex punciiliuluusd rücke 

.loyet'-Pnigraiiiriisamniliing 6: 

Tabelletikalkiilutiim. Best.-Nr. 221, DM 59,-* 


Joyce-Sonderheft 4 

Restposten: nur solange Vorrat reicht! 


Aus dem Inhalt: 


B 

Wordstar-Verbessern »gen 

B 

Hardcopy Routine 

B 

B n ndc sl igasmi ulallon 


für 24 Nadler 

B 

Pulldown Menüs 

B 

dBasc-l.itoralurvcr- 

fl 

Diskcliciimomior 


widtnng 

B 

llauplsläiltc taten in LOCKT 

B 

Universelles Werk¬ 
zeug zum Verändern 
von dBase Dateien 

Heft 

i DATÄBOX (2 Disketten 1. Kest.-Nr. 3052, DM 29,.* 



.1 o v ce-Ze ich cn satz-l )esigne r 
und M(iX 


/.eiehenmn: Designer. Fditieten. Erzeugen und Abspeichem von 
Bihlscliirm-Zciehensal/en Drücken von vor Ion mit tonen ASCII 
l osten unter CP/M Plus möglich net fettig gestaltete Zeieltetisiit 
z.e im Eicfcrmitfang enthalten Bomisprogramm zum Finslol lendet 
Joyce-Schnittstelle und Tastatur 

MGX Funktionen und Meßwerte gniliseh aut Bildschirm .I 

Drucker arithmetische Grund- und SonderlimkiMiieu sind dt» 
stcllbsu gleichzeitige Darstellung inchicrcr Funktionen mul Vielt 
teilten Dmekemusgalv der Ergebnisse im Gioßfnmini moels.li 
neben einer Klamtncrcbcnc ist eine Memory Funktion iiiicgncn 

Jnvcc - Program iiisam ml tmg 1: 

Zt'ichensal/-Designer und MGX. Besl.-Nr. 215, DM 49,-* 


Joyce-Datenbank 

Die ideale Datenbank für den Joyce mit mini 
malem Disketten-Speicherbedarf. Dennoch 
bietet Ihnen die Joyce-Datenbank maximal 27 
Felder pro Datensatz. 50 Stellen pro Feld und 
bis zu 35.000 Datensätze pro Datei, 

Daten effektiv verwalten mit der .loyce-Daten- 
bank: 

B Besonders schnell durch Verwendung der KAM Disk F.,r il.is 
Programm 

B l.nivcivcll durch «Ik- Vctwcitiliiiig von Standatd Diivkl/ii 
giiffsdalcictt 

B Bequem durch Dalcnttanslcr von vothnitdcncii Dateien m 
neu angelegte 

B Maske zairn Erlassen und tulcrn von Daten wird autoimiii-* li 
generiert 

B Komfortabel durch WuhUh i .Simicrkriierico ödet Mch 
tachsorncning 

B Listen mit uiilomalisclicr Sptllrenlimntilfeiütig und Spalten 
summen 

B Automatischer Eintrag neuct Dateien ms Disketten Haupt 
itieuil 

B StK'ielicinnc cixim.il gewählter Diuckpai.imc.cr /tu Ws ,lei 
vcrwciiilmre 

Joyce-Priigrammsa nun hing 5: 

Datenbank für PI VV 8256 und8512 Uhr Pt \V 951 2 auf knfracc i, 
Besl.-Nr. 22(1, DVI 69. " 
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CP/M 


Listiges Listen 

Dateiausgabe unter CP/M 

Wer unter CP/M eine Dokument- oder Listingdatei 
durchstöbern will, wird sich mit dem TYPE-Befehl sicher 
nicht so ganz.anf reunden können. Ist doch TYPE.COM 
nur in der Lage, Dateien stur von vorne nach hinten auf¬ 
zulisten. Ein anderes Programm muß also her, das zum ei- 
nen wesentlich komfortabler ist und eszum anderen 
zuläßt, im Text/Listing vor- und rückwärts zu blättern. 


In früheren Ausgaben der CPC sind schon einige Programme 
veröffentlicht worden, die ein Vor- und Zurückblättern in ei¬ 
ner Textdatei erlaubten. Die meisten Programme dieser Art 
nehmen aber von Haus aus schon eine Menge Speicherplatz 
in Anspruch und laden zudem die ganze Textdatei in den 
Speicher. So lassen sich damit letzten Endes nur ziemlich kur¬ 
ze Dateien ansehen. 

Die Alternative heißt “XTYPE”. 

“XTYPE" arbeitet unterCP/M und wird wie folgt gestartet: 

A>XTYPFJ Datei. Typ 

Fehlt die Dateiangabe beim Aufruf, so erscheint ein kurzer 
Hilfstext. Ansonsten wird der Schirm mit den ersten Zeilen 
der angegebenen Datei gefüllt. Folgende Eingaben sind nun 
möglich: 

+ In der Datei wird eine Seite vor¬ 
wärts geblättert; 

- es wird um eine Seite zurückgeblät¬ 
tert; 

1-9 wird eine Ziffer (ein bisneunlein¬ 
gegeben, so w ird um diese Anzahl 
Zeilen vorgeblättert. 

Jede andere Eingabe dient als “FLIP-FLOP”-SchaIter zum 
Ab- und Wiedereinschalten des Blätterns. 

Mit der STOP-Taste (<ESC> oder <CONTROL+C> bei 
CPC) wird die Ausgabe vorzeitig abgebrochen. 

Das Programm wurde in Z80-Assembler geschrieben; zum 
Einsatz kommt der CROMEMCO-Assembler, der in der ein¬ 
gedeutschten Version von der Firma Weeske vertrieben wird. 
Es lassen sich aber auch andere Assembler einsetzen. 

Zum Erzeugen des Maschinenprogramms sind folgende 
Kommandos erforderlich: 

A>ZASM XTYPE 

ä>prol:nk LINK XTYPE;EXIT 

Programminterna 

Bleibt noch die Frage offen, wie ein noch nicht einmal ein 
kByte großes Programm das schaffen kann, wozu zum Bei¬ 
spiel ein Turbo-Pascal-Programm mindestens zehn kByte an 
sowieso immer knappem Diskettenspeicherplatz benötigt. 
XTYPE macht ganz einfach von der Möglichkeit des CP/M 
Gebrauch, auf jeden Sektor einer Datei direkt positionieren 
zu können. Mit der BDOS-Funktion 33 (READ RANDOM) 
läßt sich jeder Sektor einer Datei direkt anspringen. Vorher 



muß lediglich noch die Seklornummer an den Bytes FCB+33 
bis FCB+35 im FCB hinterlegt werden. 

Die Hauptaufgabe des Programms reduziert sich auf ein Um¬ 
brechen der Textzeilen, die in den gelesenen Sektoren anein¬ 
andergequetscht vorliegen. 

Das Programm ist reichlich kommentiert, so daß Sie weitere 
Details dem Programmli st i ng e nt nehmen könne n. 

Das Programm ist ursprünglich so eingestellt, daß ein Bild¬ 
schirm mit jeweils 30 Zeilen gefüllt wird; eine Zeile ist dabei 
maximal 90Zeichen lang. 

Wer dies zur Anpassung an den CPC abändern möchte, muß 
die Labels LWIDTH sowie MAXPAGE mit den Werten 80 
und 24 belegen. 

Wolfgang Träbers/rs 


XTYPE: <c> 

1991 Valfgang Traeber 

& 

OFC International 

Aufruf: 

A>XTYPE Dateinam.Typ 

Folgende Eingaben sind dann moogltch: 

+ 

- weiterblaettern um eine Sei te 

- 

“ ura eine Seite zurueckblaettern 

1 bis 9 

- 1 bis 9 Zeilen welterblaettern 

'C 

= STOP: Mit "C Programm beenden 

sonst 

= Blaettern aus- bzw. einschal ter. 


Wird heim Start von XTYPE kein Dateiname angegeben, erscheint die 
Liste aller möglichen Funktionen. 
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CP/M 


title 

XTYPE: 

Textdatei auf Bildschirm ausgeben 

subttl 

ADDR OPCODE 

LINE INSTRUCTION 

f 

t 

Definitionen 


r 

bdos 

equ 

5 

;BDOS Einsprungadresse 

conio 

equ 

6 

;BDOS DIRECT CONSOLE I/O 

nowait 

equ 

255 

;Tastatur lesen ohne zu 




; warten 

printf 

equ 

9 

;BDOS PRINT STRING 

openf 

equ 

15 

;BDOS OPEN FILE 

randomr 

equ 

33 

;BDOS READ RANDOM 

fcb 

equ 

005ch 

;Standard FCB 

fcbrl 

equ 

007dh 

;FCB Random Number RI 

fcbr3 

equ 

007fh 

;FCB Random Number R3 

dma 

equ 

0080h 

;DMA-Adresse 

error 

equ 

OOffh 

;CP/M Fehlercode 

stop 

equ 

3 

;Abbruchcode ALT-C 

tab 

equ 

9 

;Tabulator 

er 

equ 

Odh 

;Carriage Return 

lf 

equ 

Oah 

;Line Feed 

eof 

equ 

Iah 

;End of File 

lwidth 

equ 

90 

;Zeichen pro Zeile 

maxpage 

equ 

30 

; Zeile pro Seite 

pagec 

equ 

' + ' 

; Seite vorwaerts blaettern 

backe 

equ 

/ __ / 

;rueckwaerts blaettern 

/ 

Datenbereiche 


oldstk: 

dw 

0 

;Systemstack sichern 

lstcmd : 

db 

pagec 

; letztes Kommando 

linent : 

db 

maxpaqe ;Zeilenzaehler fuer Seite 

chrcnt: 

db 

0 

;Zeichenzaehler fuer Zeile 

txtptr: 

dw 

0 

;Zeiger auf Text 

flaglf: 

db 

0 

;Flag fuer Line Feed 


ds 

32 

;16 Level Stack 

locstk: 




hlptxt: 




db 'XTYPE: (c) 

1991 

Wolfgang Traeber' 

db er, 

lf 



db ' 

& 

CPC International' 

db er. 

lf,cr,lf 



db 'Aufruf: 

A>XTYPE Dateinam.Typ' 

db er, 

lf,cr,lf 



db 'Folgende Eingaben sind dann moeglich:' 

db er, 

lf 



db ' 

+ 

= weiterblaettern um eine Seite' 

db er. 

lf 



db ' 

- 

= um 

eine Seite zurueckblaettern' 

db er. 

lf 



db ' 

1 bis 9 

= 1 bis 9 Zeilen weiterblaettern' 

db er, 

lf 



db ' 

A C 

= STOP: Mit A C Programm beenden' 

db er, 

lf 



db ' 

sonst 

= Blaettern aus- bzw. einschalten' 

db er, 

lf,cr,lf 



nofile: 





db er 

,lf 



db 'Datei ist nicht vorhanden',er,lf,'$' 

/ 

/ 

Programmstart 


init: 




ld 

(oldstk),sp 

;Systemstack sichern 

ld 

sp,locstk 

;SP <- lokaler Stackbereich 

ld 

hl,dma 


;HL <- Adresse Parameter- 




; string 

ld 

a,(hl) 


;A <- Laenge Parameter 

and 

a 



jr 

z,help 


;IF Laenge > 0 

ld 

b,a 


;B <- Laenge 

ine 

hl 


;HL <- Zeichen Parameter 

skip: 



;CYCLE 

ld 

a,(hl) 


;A <- Zeichen 

cp 

/ / 



jr 

nz,fileopen 

;BREAK IF NOT Blank 

ine 

hl 


;HL <- naechstes Zeichen 

djnz 

skip 


;END CYCLE 

ld 

c,printf 

;C <- Print String 

ld 

de,hlptxt 

;DE <- Hilfstext 

call 

bdos 


;Bedienungsanleitung ausgeben 


< jp 

exit 

;ENDIF 

/ 

fileope 

7: 


ld 

c,openf 

;C <- Open File 

ld 

de,fcb 

;DE <- Adresse FCB 

call 

bdos 

;Datei eroeffnen 

cp 

error 


jr 

nz,type 

;IF Open Fehler 

ld 

c,printf 

;C <- Print String 

ld 

de,nofile 

;DE <- Fehlermeldung 

call 

bdos 

;ausgeben 

> jp 

exit 

;Programmende 

type: 

ld 

hl, -1 

;Satznummer initialisieren 

ld 

(fcbrl),hl 

;0FFFFH -> R1R2 

sub 

a 


. ld 

(fcbr3),a 

;0 -> R3 

typeout 


;CYCLE 

ld 

hl,(fcbrl) 

;Satznummer in FCB erhoehen 

inc 

hl 


ld 

(fcbrl),hl 


ld 

c, randomr 

;C <- Read Random 

ld 

de,fcb 

;DE <- Adresse FCB 

call 

bdos 

;Satz direkt lesen 

cp 

error 


jP 

z ,exi.t 

;EXIT bei Fehler 

ld 

hl,dma 

;Textzeiger auf DMA stellen 

ld 

(txtptr),hl 

typeOl: 


;CYCLE 

ld 

hl,(txtptr] 

;HL <- Textzeiger 

ld 

a,l 

;Pufferende wenn HL = 0100h 

cp 

h 


jp 

z,type 21 

;IF NOT Pufferende 

ld 

a,(chrcnt) 

;A <- Anzahl Zeichen in 
;Zeile 

cp 

lwidth 

;Zeile voll 

jr 

c,type 02 

;IF Zeile voll 

sub 

a 


ld 

(chrcnt),a 

;Zeichenzaehler auf Null 

push 

af 


sub 

a 


ld 

(flaglf),a 

;Schalter Neue Zeile 
;deaktivieren 

pop 

af 


ld 

a, lf 

;A <- Line Feed 

jr 

type02: 

type03 

; ELSE 

push 

ld 

af 

a, 255 

(flaglf),a 


ld 

;Schalter Neue Zeile 
;aktivieren 

pop 

af 


ld 

a,(hl) 

;A <- Zeichen 

inc 

hl 


ld 

(txtptr),hl 

;Textzeiger erhoehen 

and 

7fh 

;Bit 7 auf Null 

type03: 


;ENDIF 

cp 

eof 


jP 

z,exit 

;Dateiende -> 

cp 

er 


jr 

nz,type04 

;IF Carriage Return 

ld 

e,a 

;E <- Zeichen 

sub 

a 


ld 

(chrcnt),a 

;Zeichenzaehler auf Null 

ld 

c,conio 

;C < Direct Console I/O 

call 

bdos 

;Zeichen ausgeben 

jr 

typeOl 

; LOOP 

type04: 


; ELSE 

cp 

tab 

;Tabulator ? 

jr 

nz,type 06 

;IF Tabulator 

ld 

a, (chrcnt) 

;A <- Position in Zeile 

ld 

b,a 

Of 8h 

;B <- Position 

and 


add 

3,8 

;A <- naechste Tabulator- 
Position 

ld 

(chrcnt) ,a 

;Position abspeichern 

sub 

b 

;A <- Distanz zur Tabulator- 
;Position 

ld 

b,a 

;B <- Distanz 

type05: 


;CYCLE (B) 

ld 

e, ' ' 

;E <- Blank 

push 

bc 

;BC sichern 
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CP/M 


ld 

call 

pop 

djnz 

jr 

type 06 : 
cp 

is 

cp 

jr 

ld 

dec 

jr 

ld 

and 

jr 

ld 

ld 

call 
type07: 

jr 


c ,conio 

bdos 

bc 

type05 
typeOl 


lf 

nz,typel9 
a,(Istcmd) 
pagec 
nz,type09 
hl,lincnt 
(hl) 

z,type 08 
a, (flaglf) 
a 

z,type07 
e, lf 
c,conio 
bdos 

typeOl 


;C <- Direct Console I/O 
;Leerzeichen ausgeben 
;BC zurueckholen 
;END CYCLE 

;naechstes Zeichen ver- 
;arbeiten 
; ELSE 

;IF Line Feed 

;A <- letztes Kommando 

;IF vorwaerts blaettern 

;Zeilenzaehler vermindern 
;IF Seite noch nicht voll 


;IF Neue Zeile aktiviert 
;E <- Line Feed 
;C <- Direct Console I/O 
;Neue Zeile 
; ELSE 
; LOOP 


z 


ENDIF 

type 08 : 


/ELSE 

jr 

typell 

/ENDIF 

type09: 


/ELSE 

ld 

c,conio 

/C <- Direct Console I/O 

ld 

de,nowait 

/E <- Lesen ohne Warten 

call 

and 

bdos 

a 

/Tastatur abfragen 

jr 

nz,typell 

/IF Taste nicht gedrueckt 

ld 

a,(flaglf) 

/A <- Schalter Neue Zeile 

and 

a 


jr 

z,typelO 

/IF Neue Zeile aktiv 

ld 

e, lf 

;E <- Line Feed 

ld 

c,conio 

;C <- Direct Console I/O 

call 

bdos 

/Neue Zeile 


typelO: 

jP 

typell: 
cp 
ir 

typel 2 : 
ld 
ld 

call 

and 

jr 

cp 

l r 

cp 

ir 

cp 

jr 

add 

typel3: 
cp 

IS 

ld 

type14: 
call 
ld 
dec 
jr 
ld 
ld 
ld 
ld 
jr 

typel5: 

cp 

jr 

cp 

jr 

and 

ld 

ld 

ld 

jr 


/ ELSE 
;ENDIF 
; ELSE 

;IF NOT Abbruch 
;CYCLE 

;C <- Direct Console I/O 
;E <- Tastatur abfragen 

;BREAK IF Taste gedrueckt 
;END CYCLE 

;BREAK IF EOF 
;IF >= 'a' 

;AND <= 'z' 

;umwandeln in Grossbuchstaben 
;ENDIF 

/Kommando abspeichern 


typeOl 

stop 
z,exit 

c,conio 
de,nowait 
bdos 
a 

z,type 12 
eof 

z,exit 
'a' 

c,typel3 
/ / 

nc,typel3 
a,oeOh 

(Istcmd),a 
backe 

nz,typel5 ;IF zurueckblaettern 
a,2*maxpage+l 

(lincnt),a /Zeilenzaehler = 2 Seiten + 1 
;CYCLE (lincnt) 

/eine Zeile zurueck 
/HL <- Zeilenzaehler 
/vermindern 
/END CYCLE 


backup 
hl,lincnt 
(hl) 

nz,typel4 
a,pagec 
(Istcmd),a 
a,maxpage+l 
(lincnt),a 
typen 


c,typel6 

t . / 

nc,type 16 

Ofh 

(lincnt),a 
a,pagec 
(istcmd),a 


type17 


/Kommando initialisieren 
/Zeilenzaehler initialisieren 
/ELSE 
/IF >= 1 
/AND <= 9 

/umwandeln in binaer 
/-> Zeilenzaehler 

/Kommando auf vorwaerts ein- 
/stellen 


type 16 : 
ld 
ld 

typen: 
ld 
and 
jr 

ld 

ld 

call 
typel8: 
jP 

typel9: 
cp 

jr 

ld 

type 20 : 

ld 

ld 

call 

ld 

inc 

jP 

type 21 : 
1P 


exit: 
ld 
ret 


backup: 

ld 

dec 

dec 

ld 

backupl 

ld 

ld 

cp 

call 

ret 

ld 

dec 

ld 

cp 

inc 

inc 

ld 

ret 


a,maxpage 
(lincnt),a 

a,(flaglf) 
a 

z,typel8 

e, lf 
c,conio 
bdos 

typeOl 


nc,type 20 

a,'.' 

e,a 

c,conio 
bdos 

hl,chrcnt 

(hl) 

typeOl 

typeout. 

Programmende 


/ELSE 

/Zeilenzaehler initialisieren 
/ENDIF 


/IF Schalter Neue Zeile 
/aktiviert 


/Neue Zeile 
/ENDIF 
/ LOOP 


/IF Zeichen nicht abdruckbar 
/durch Punkt ersetzen 
/ENDIF 

/E <- Zeichen 
/C <- Direct Console I/O 
/Zeichen ausgeben 

/Textzeiger erhoehen 
/END CYCLE 

/END CYCLE 


sp,(oldstk) /SP <- Systemst-ack 
/zurueck nach CP/M 

um eine Zeile zurueckblaettern 


hl,(txtptr) /Textzeiger um zwei Stellen 
/zurueck 
hl 
hl 

(txtptr),hl 

hl, (txtptr) 
a, 7fh 
1 

z,newbuf 

a,(hl) 
hl 

(txtptr),hl 

nz,backupl 
hl 
hl 

(txtptr),hl 


/abspeichern 
Z CYCLE 

/HL <- Textzeiger 

/IF Pufferueberschreitung 
/auf neuen Puffer einstellen 
/BREAK 
/ELSE 

/Textzeiger vermindern 
/abspeichern 

/IF Line Feed 

/Textzeiger + 2 
/abspeichern 
/ENDIF 


/HL <- Record Number Rl 
/IF erster Sektor 


/ vorherigen Sektor lesen 

/ der Textzeiger wird auf das Ende des Puffers 
/ gesetzt 

/ beim ersten Sektor ist Flag Z, sonst NZ 
/ 

newbuf: 
ld 
ld 
cp 
jr 
ld 
ld 
ret 

newbuf 1 : 
dec 
ld 
ld 
ld 

call 
ld 
ld 
or 
ret 


hl,(fcbrl) 
a,h 
1 

nz,newbuf 1 
hl,dma 

(txtptr),hl /Textzeiger auf Anfang 


/ELSE 

/Satznummer vermindern 
/in FCB abspeichern 
/C <- Read Random 
/DE <- Adresse FCB 
/Sektor lesen 

, /HL <- Pufferende 

(txtptr),hl /abspeichern 
1 /Non Zero Flag 


hl 

(fcbrl),hl 
c,randomr 
de,feb 
bdos 

hl,dma+l27 


Ende XTYPE.ASM 
end init 
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Hinter den Kulissen 

Ein Blick in den DMP 3160 

Wir haben den am weitesten verbreiteten CPC-Drucker, den DMP3160, ein¬ 
mal etwas näher ungeschaut und auch auseinandergenommen. 

Dabei haben w ir einige Informationen für Leute gefunden, die kein Hand¬ 
buch mehr haben. 


Die verschiedenen DMP-Drucker sind 
sieh im Aufbau alle recht ähnlich. Stell¬ 
vertretend haben wir uns einmal den 
DMP 3160 vorgenommen. Als 9-Na- 
del-Drucker schafft er eine Druckge¬ 
schwindigkeit von 160 Zeichen pro Se¬ 
kunde mit einem für Heimanwendun¬ 
gen völlig ausreichenden Schriftbild. 
Da es sich um einen Flachbettdrucker 
handelt, verarbeitet er auch besonders 
starkes Papier, ja selbst Pappe. Durch 
den ungewöhnlichen Aufbau wird es 
möglich, Endlospapier unter den 
Drucker abzulegen, was zu einer erheb- 
lichen Platzersparnis auf dem Arbeit¬ 
slisch führt. Die Bodenfreiheit beträgt 
6.5 Zentimeter und bietet damit Platz 
für et wa 500 Druckseiten. 

Norm-konform 

Mil dem Computer ist der Drucker über 
den Centronics-Anschluß verbunden. 
Während jedoch der CPC ganz Centro- 
nics-unüblich nur7 Datenbits abschickt, 
kann der 3160 Epson-übliche 8 Bits 


empfangen. Für dieses Problem gibt es 
von Seiten des Druckers eine soft¬ 
waremäßige Lösung. Über eine Esca- 
pe-Sequenz kann je nach Wunsch das 
achte Bit gesetzt oder rückgesetzt wer¬ 
den. 

Von den 36 am Centronics-Anschluß 
zur Verfügung stehenden Pins sind 21 
mit verschiedenen Funktionen belegt. 
Hier eine kurze Erklärung zu den ein¬ 
zelnen Leitungen: 

(Ein “/"-Zeichen vordem Signalnamen 
bedeutet, daß das entsprechende Pin bei 
Low-Pcgcl den Aktiv-Status anzeigt.) 
/DATASTROBE: Bei Low-Pegel über¬ 
nimmt der Druckerdie anliegenden Da¬ 
ten. 


Dip-Schalter: Emulationen 


Zeichensatz 

DSI-7 

DS 1 - 

8 



Epson FX-Standard 

off 

off 

Epson FX-NLQ 

Oll 

off 

D5M#i 

off 

on 

IBM #2 

on 

on 


Dip-Schalter: 




Internationale Zeichensätze 


Land 

DS1-I 

DSI-2 

DS 1 -3 

USA 

on 

Oll 

on 

Frankreich 

off 

on 

on 

Deutschland 

on 

off 

on 

Großbritannien 

off 

off 

on 

Dänemark 

on 

on 

off 

Schweden 

off 

On 

off 

Italien 

Oll 

off 

off 

Spanien 

off 

off 

off 


Der Impuls muß mindestens 0,5 Mikro¬ 
sekunden lang sein. 

DATA 0-7: Dies sind die acht Datenlei¬ 
tungen. Die Daten sollten mindestens 
0,5 Mikrosekunden vor dem /DATA- 
STROBE-Signal anliegen. 
/ACKNOWLEDGE: Nach Beendi¬ 
gung der Dateneingabeprozedur wird 
ein Low-Impuls erzeugt. Anschließend 
ist der Drucker empfangsbereit. Wird 
vom Deselect- in den Select-Status ge¬ 
wechselt, wird dieser Impuls ebenfalls 
gesendet. 

BUSY: Bei folgenden Bedingungen 
liegt an diesem Pin High-Potential: 

- bei vollem Druckerpuffer, 
während des Drückens, 

- wenn Daten empfangen, aber noch 
nicht verarbeitet wurden. 

PE: Dieser Pin ist unter folgenden Be¬ 
dingungen high: 

- wenn das Papier zu Ende ist, 

- im Select-Status nach dem Papier¬ 
transport, 

-im Deselect-Status. 

SELECT: Liegt an diesem Pin High- 
Potential, befindet sich der Drucker im 
Select-Status; bei Low-Potential im 
Deselect-Status, in dem keine Daten 
empfangen werden können. 

/INPUT PRIME: Wird an diesem Pin 
ein Low-Impuls von mindestens 100 
Mikrosekunden Länge gegeben, so 
wird der Drucker initialisiert. 

/FAULT: Ist im Deselect-Status low. 
/SELECTIN: Mit Low-Pegel an die¬ 
sem Pin wird der Drucker selektiert. 
Dieses Signal beeinflußt das SELECT- 
Signal. 

Die richtige Voreinstel¬ 
lung ist gefragt 

Links neben dem Centronics-Anschluß 
befinden sich die DIP-Schalter. Bei vie¬ 
len Druckern nur mit Schwierigkeiten 
erreichbar, sind sie beim DMP ohne 
Probleme zugänglich. Bevor man Ein¬ 
stellungen an den Schaltern vornimmt. 


60 CPC 2/3'92 










Know-how 


sollte der Drucker ausgeschaltet wer¬ 
den. Nach dem Wiedereinschalten sind 
dann die gewünschten Vorgaben gültig. 
Macht der Drucker Probleme, so liegt 
es meist an der falschen Stellung der 
Schalter. Ist zum Beispiel der Zeilenab¬ 
stand viel zu groß, oder werden Zeilen 
übereinandergedruckt, so liegt es meist 
am Schalter DSM. Steht dieser auf 
“OFF", so führt der Drucker bei Emp¬ 
fang des CR-Zeichens (CHR$( 13)) nur 
einen Wagenrücklauf durch. Steht er 
dagegen auf “ON”, so führt der Drucker 
zusätzlich zu dem Wagenrücklauf noch 
einen Zeilenvorschub aus. Sendet der 
Computer anschließend noch ein LF- 
Zeichen (CHR$(10)), führt der DMP 
einen weiteren Zeilenvorschub durch, 
und man hat einen zu großen Abstand 
zwischen den Zeilen. 

Auch auf die richtig eingestellte Pa¬ 
pierlänge sollte man achten, ansonsten 
hat man den Seitenvorschub an der 
falschen Stelle. Die Justierung des Pa¬ 
piers funktioniert damit also nicht mehr 
richtig. Bekommen Sie trotz eingestell¬ 
tem deutschen Zeichensatz keine Um¬ 
laute aufs Papier, so sollten Sie einmal 
die Einstellung der Emulation kontrol¬ 
lieren. Mit den DIP-Schaltern DS1-7 
und DSI -8 haben Sie die Möglichkeit, 
zwischen vier Standardzeichensätzen 
zu wählen. Für CPC-Anwendungen 
sind die ersten beiden richtig (Epson- 
Draft und NLQ); der erste IBM-Zei- 


Schnittstelle(Centronjcs-Interface) 


Pin 

Bezeichnung 

Richtung 

1 

/DATASTROBE 

IN 

2 

DATAO 

IN 

3 

DATA 1 

IN 

4 

DATA2 

IN 

5 

DATA3 

IN 

6 

DATA4 

IN 

7 

DATA5 

IN 

8 

DATA 6 

IN 

9 

DATA7 

IN 

10 

/ACKNOWLEDGE 

OUT 

11 

BUSY 

OUT 

12 

PE 

OUT 

13 

SELECT 

OUT 

ml6 

GND 


17 

CHASSIS GND 


18 

+5 Voll 

OUT 

19-30 

GND 


31 

/IN PUT PRIME 

IN 

32 

/FAULT 

OUT 

33 

GND 


35 

+5 Volt 

OUT 

36 

/SLCT1N 

IN 

Alle nicht aufgeführten Pins sind nicht belegt. 


chensatz enthält keine deutschen Um¬ 
laute. 

Als kleine Hilfe, für jemanden, der 
eventuell seinen DMP ohne Handbuch 
gebraucht, haben wir eine Tabelle mit 
den Stellungen der DIP-Schalter abge¬ 
druckt. 

Wirft man einen Blick in das geöffnete 
Gerät, die Mechanik vom. so sieht man 
links oben die zur Stromversorgung 
gehörigen Teile. Dies sind der Trafo, ei¬ 
ne Extraleiterplatte mit Entstörkonden¬ 


satoren und der Sicherung sowie die auf 
der Hauptplatine befindliche Elektro¬ 
nik zur Aufbereitung der Versorgungs¬ 
spannung. 

Rechts daneben geht es dann bereits 
weiter mit der Druckersteuerelektro¬ 
nik. Als besonders groß fallen dabei das 
RAM, der 32-kbyte-EPROM und das 
Herz des Druckers, der Prozessor, ins 
Auge. Links unterhalb des RAM-Bau- 
steins befindet sich der Verstärker¬ 
schaltkreis, der die einzelnen Nadeln 



Die DlP-Schalter links und der Centronics-Anschluß rechts 



Hin Blick auf die Eingeweide des DMP 
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Das Herz des Druckers 

ansteuert. An den eben aufgezählten 
Teilen ist es meist nicht möglich, selbst 
irgendwelche Reparaturen durchzu- 
führen. Vor allem an das Netzteil soll¬ 
ten nur Fachleute Hand anlegen. Vorn 
hat man als oberstes der mechanischen 
Teile den Druckkopf. Rechts oben, 
nicht gleich sichtbar, befindet sich der 
Motor, der den Kopf bewegt. Auf der 
linken Seite findet man etwas weiter 
unten den Motor für den Seitenvor¬ 
schub. Die ganze Mechanik ist sehr ein¬ 
fach aufgebaut, aber trotzdem sehr prä¬ 
zise. Die meisten Probleme bei 
Druckern entstehen dadurch, daß sich 


ein Stück Druckerpapier oder - viel 
schlimmer - ein Selbstklebe-Etikett in 
der Mechanik verhängt. Sollte Ihnen 
das passieren, so können Sie sich meist 
selbst weiterhelfen. 

Der einfache Aufbau 
birgt für Langlebigkeit 

Da der DMP in dieser Beziehung sehr 
bedienerfreundlich gebaut ist. brau¬ 
chen Sie dazu meist nicht einmal den 
Deckel abzuschrauben. Bei hartnäcki¬ 
gen Fällen kann das aber schon einmal 
nötig sein. Im schlimmsten Fall muß 


man etwas weiter schrauben. Hat man 
das Gehäuse geöffnet - bitte aber nicht 
vergessen, den Netzstecker herauszu¬ 
ziehen so sollte man als erstes die Po¬ 
sition aller beweglichen Teile markie¬ 
ren. Hiermit beugt man allen eventuel¬ 
len Fehlern beim Wiederzusammenbau 
vor. Als erstes baut man die vordere 
Leiste, aufderdie Markierungen fürdie 
Papiergrößen stehen, ab. 

Anschließend löst man die Schraube, 
die das Gegenrad für den Zahnriemen 
hält. Diese befindet sich auf der linken 
Seite. Dann entfernt man den Spreng¬ 
ring von der Achse, auf der sich der 
Druckkopf bewegt. Diese läßt sich nun 
nach rechts - beachten Sie die Federn, 
die links und rechts gegen die Achse 
drücken - herausziehen. Nun lösen Sie 
noch die Schrauben des darunterliegen- 
den Bleches. Hier finden Sie nun den 
Übeltäter, der Ihren Drucker lahmge¬ 
legt hat. 

Vor dem Wiederzusammenbau emp¬ 
fiehlt es sich, den gesamten Papierlauf 
gründlich mit Waschbenzin zu reini¬ 
gen. Die selben Arbeitsgänge müssen 
Sie durchführen, wenn Sie vielleicht 
einmal selbst den Druckkopf wechseln 
wollen. 

Natürlich können Sie sich dann die De¬ 
montage des Bleches ersparen. Den Zu¬ 
sammenbau nehmen Sie nun in umge¬ 
kehrter Reihenfolge vor. 

Planmäßiges Vorgehen 
gefragt 

Sie werden sich vielleicht schon einmal 
gefragt haben, wie wohl der 1 lebel auf 
der linken Seite des Druckers.funktio¬ 
niert. Mit diesem Hebel stellen Sie die 
Andruckstärke für die Drucknadeln 
ein. Je abgenutzter die Druckkopfna¬ 
deln sind, desto stärker müssen Sie den 
Andruck einstellen. 

Beim DMP hat die Mechanik aber ei¬ 
nen Nachteil, der sich bei älteren Gerä¬ 
ten bemerkbar macht. Um den Andruck 
zu verstärken, wird der Druckkopf ge¬ 
kippt, da er auf der Rückseite arretiert 
ist. Je weiterder Druckkopf nun geneigt 
wird, desto ungleichmäßiger wird der 
Andruck der Nadeln. Deshalb hier ein 
Tip für Käufer eines gebrauchten 
DMP-Druckers: Ist die Stärke der Zei¬ 
chen im oberen Bereich der Buchstaben 
größer als im unteren, so ist der Druck¬ 
kopf schon sehr stark abgenutzt. Man 
benötigt also bald einen neuen, was 
man beim Preis für den gebrauchten 
Drucker berücksichtigen sollte. 

Jörg G uro wski 


Überblick über die Funktionen der DIP-Schalter 


Schalter 

Funktion 

off 

Oll 

DSM 

internationale Zeichen 

siehe Ze i c h en satzta bei lc 


DS1-2 

internationale Zeichen 

siehe Zeichensatztabelle 


DSI-3 

internationale Zeichen 

siehe Zeichensat ztabelle 


DSl-4 

Wagenrücklauf (CR) 

nurCR 

CR und LF 

DSI-5 

Papierende-Erkennung 

ein 

aus 

DS1-6 

Seitenlange 

11 Zoll 

12 Zoll 

DS1-7 

Standard-Zeichensatz 

siehe Emulationstabelle 


DS1-8 

Standard-Zeichensatz 

siehe Emulationstabelle 


DS2-1 

Null-Zeichen 

0 

0 

DS2-2 

Perforation überspringen 

aus 

ein 

DS2-3 

Puffer-Modus 

Zeichen 

Grafik 

DS2-4 

Puffer-Modus 

Zeichen/Grafik 

benutzerdefiniert 

DS2-5 

SLCTIN-Signal 

nicht gesendet 

automatisch gesendet 

DS2-6 

Piepser 

aus 

ein 

DS2-7 

eingestellte Schrift 

Fettdruck aus 

Schmalschrift und Fettdruck ein 

DS2-8 

eingestellte Schrift 

Schmalschrift aus 

Fettdruck ein 

DS2-9 

ohne Bedeutung 



DS2-10 

ohne Bedeutung 




62 CPC 2 / 3'92 
















Know-how 


Immer feste druff 

Stapelspeicher im Detail 

Die Geschichte der Schleifen reicht vermutlich bis weit in die Prä-CPC-Zeit 
zurück. Dabei setzte erst die EDV diesem eher gegenständlichen BegrifTden 
Stempel des W'iederkehrenden auf. Warum man sich hiergegen den (grob¬ 
schlächtigen) Knoten für die (feinere) Schleife entschied, ist nur eine von vie¬ 
len faszinierenden Fragen. Was Schleifenkonstruktionen und Stack fürs Pro¬ 
grammieren in Assembler bedeuten, ist eine andere. Jeder, der auch nach dem 
Lösen der weihnachtlichen Geschenkeschleifchen noch Lust auf schnelle 
Schleifen im Prozessorsumpfhat, sollte sich den folgenden Artikel nicht ent¬ 
gehen lassen. 


Wohl jeder kennt sie: die monotonen 
Arbeiten, bei denen ein Handgriff stän¬ 
dig zu wiederholen ist und bestenfalls 
die Farbe des bearbeiteten Materials für 
Abwechslung sorgt, ln vielen Betrie¬ 
ben werden solche Arbeiten heute über 
Automaten erledigt, zum großen Leid¬ 
wesen vieler Schüler und Studenten, 
die früher nicht selten auf solche Jobs 
angewiesen waren. 

Mit Kopf und Fuß 

lm Bereich der Programmierung hat 
man schon sehr früh auf etwas abstrak¬ 
terer Ebene ständig wiederkehrende 
Abläufe zusammengefaßt. In Basic und 
anderen Hochsprachen gehören solche 
Konstrukte neben den Unterprogram¬ 
men sicherlich zum mächtigsten Pro¬ 
grammierer-Werkzeug. 

Die Rede ist natürlich von den Schlei¬ 
fen. Ob sie nun “FOR ... NEXT”, 
“WEND ... Will LE” oder “LOOP ... 
UNT1L” heißen: Sie unterscheiden sich 
in ihrer Funktion nur in einem einzigen 
Punkt. Die Entscheidung, ob eine 
Schleife ein weiteres Mal durchlaufen 
werden soll, kann am Anfang (FOR ... 
NEXT) oder Ende (WEND ... Will LE) 
stehen. Abseits der Hobbyszene im Be¬ 
reich der professionellen Programmie¬ 
rung spricht man von kopf-oder l ußge- 
steuerten Schleifen. Das hört sich zwar 
ein bißchen mehr nach Krawatten- 
EDV an, meint aber das gleiche. 
Schleifen sind auf jeden Fall das A und 
O der Programmierung. Da es dem As¬ 
semblerfreund als echtem Puristen 
auch hier wieder am vorgefertigten 
Einheitsbrei mangelt, muß er selbst 
Handanlegen. 

Da im Z-80-Assembler anders als etwa 
beim Locomotive-BASIC kein kom¬ 
plettes Schleifenkonstrukt zur Verfü¬ 
gung steht, müssen wir uns aus Sprung¬ 


befehlen und Registern etwas basteln. 
Das ist aber keine Schwierigkeit: Zum 
Zählen haben wir ja den INC- und den 
DEC-Befehl. Verschiedene bedingte 
Sprungbefehle stehen auch zur Verfü¬ 
gung. Der selbstgebauten Schleifen¬ 
routine steht also nichts im Wege. 

Gut gehüpft! 

Bei den Sprungbefehlen ist der As- 
semblianer seinem 1 lochsprachen-Kol- 
legen gegenüber sogar im Vorteil: Wir 
haben weitaus mehr Möglichkeiten, ei¬ 
ne Sprungbedingung zu definieren, als 
es etwa in BASIC möglich wäre. Neben 
den sogenannten relativen Sprüngen 
gibt es noch die “absoluten Sprünge”. 
Innerhalb dieser Unterscheidung lassen 
sich noch entsprechende Bedingungen 


vorgeben, die über “Sprung oder Nicht- 
Sprung” entscheiden. 

Absolute Sprünge gehen immer an eine 
feststehende Stelle im Programm, wie 
etwa eine durch ein Label markierte Po¬ 
sition. Nach dem Assemblieren wird 
ein solches Label ja durch eine Adresse 
ersetzt, so daß immer an eine absolute 
Adresse gesprungen wird. 

Ist diese Art des Sprungs mit einer Be¬ 
dingung verknüpft, so spricht man vom 
“absoluten bedingten Sprung”. Ent¬ 
sprechend gibt es auch den “absoluten 
unbedingten Sprung”, wie etwa eine 
“JMP Sprungmarke”. 

Eine Frage der Zeit 

Beim unbedingten Sprung muß man 
abwägen, ob er schnell ausgeführt wer¬ 
den oder lieber mit dem Speicherplatz 
sparsam umgehen soll. Bei schnellen 
Kopierroutinen kommt es sicherlich 
eher auf die Performance als auf den 
Gewinn eines Bytes an. Entsprechend 
wählt man für die schnelle Lösung ei¬ 
nen “absoluten unbedingten” Sprung¬ 
befehl. Wer Bytes sparen will,entschei¬ 
det sich dagegen für den “relativen un¬ 
bedingten” Sprungbefehl. 

JP Z,SPRUNGMARKE 
»•bedingter absoluter Sprung 
; (bei gesetztem Zerc-Flaq) 

JP SPRUNGMARKE 

/unbedingter absoluter Sprung 
JR Z,N 


STACK 



High Byte 

Low Byte 


High Byt 

e 



Low Byte 




&BFFF 

&BFFE 

&BFFD 

&BFFC 


Der Stock verwaltet die Rückkehradressen für Unterprogramme. Dieses Schema zeigt Stack und 
Stackpointer nach Eintrag von zwei I6-Bit-Werlen 
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Sprungart 

Speicherbedarf 

Dauer bei Ausführung 

Dauer, wenn nicht auseel'Uhrt 

absolut 

relativ 

3 Bytes 

2 Bytes 

2.5 Mikrosekunden 
3,()Mikrosekuhden 

2,5 Mikrosekunden 

1,75 Mikrosekunden 

Unterschiedliche Sprungkonzepte brauchen unterschiedlich 

viel /.eil auch dann, wenn die he- 


treffende lut/Scheidung "Nicht-Sonnig " lautet 


»•bedingter relativer Sprung 
;um "N" Speicherstellen 
; (bei geserztem Z-Flag) 

JRN 

/unbedingter relativer Sprung 
;um "N" Speicherstellen 

Für Schleifen bieten sich die bedingten 
relativen oder absoluten Sprungbefehle 
an, denn man möchte die Routine ja ir¬ 
gendwann einmal verlassen. 

Weitsprung 

Woher weiß nun ein Sprungbefehl, daß 
eine Abbruchbedingung erfüllt ist? Als 
Kriterium für den Ausstieg dienen wie¬ 
der unsere alten Bekannten, die Flags 
oder “Flaggen”. Das Zero-Flag kann 
ebenso wie ein Vorzeichen, ein Parity- 
und Carry-Flag eine Sprungbedingung 
erfüllen. 

Die einfachste Möglichkeit, eine 
Schleife mit einer vorher festgelegten 
Anzahl von Durchläufen zu verwirkli¬ 
chen. besteht darin, ein Register mit ei¬ 
nem Zähler zu versehen, dessen Wert 
dann über "DFC Register” herunterzu¬ 
zählen und die Schleife so lange zu 
durchlaufen, bis das Zero-Flag durch 
Erreichen von ”0" gesetzt wird. 

LD 3C, ^255 ; Zähler setzer 

SCHLEIFE: 

DEC BC ; Zähler -1 

JNZ SCHLEIFE ;bis BC=0 


Das “N” bei “JNZ” ist dabei nur eine 
Umkehrfunktion und bedeutet nur 
“nicht”. Entsprechend gibt es einen 
Sprung bei erfüllter (JZ) und nicht er- 
füllter (JNZ) Bedingung. 

Ganz schön Stack-sig 

Kommen wir nun zu einem weiteren 
unverzichtbaren Abschnitt der Assem¬ 
blerprogrammierung. 

Spätestens dann, wenn Programme den 
Umfang einiger DIN-A4-Seiten spren¬ 
gen und Probleme in viele Einzelaspek¬ 
te aufgeteilt werden, ist es nötig, echte 
Unterprogramme zu verwenden. Echte 


Unterprogramme unterscheiden sich 
von Schleifen oder einfachen Sprüngen 
durch einen definierten Zugang. Aus 
einem Unterprogramm kommt man nur 
in einer vorgeschriebenen Weise mit 
“RET” zurück. Auch sollten Unterpro¬ 
gramme ihre Register-Umgebung so 
verlassen, wie sic sie beim “Eintreten” 
vorgefunden haben. 

Durch Unterprogramme werden As¬ 
semblerprogramme erst portabel. Dar¬ 
über hinaus muß man sich die Routine 
XY nicht wegen einiger Parameterän¬ 
derungen x-mal neu schreiben, wenn 
man sie in ein Unterprogramm verban¬ 
nenkann. 

Die Kommunikation von Unterpro¬ 
grammen mit dem Hauptprogramm so¬ 
wie die Sicherung und Restaurierung 
beteiligter Register erfolgen über den 
sogenannten Stapelspeicher oder auch 
Stack. 

Bevor wir nun wild von einem anschei¬ 
nend durch Fügung des Schicksals vor¬ 
handenen Instrument Gebrauch ma¬ 
chen, schauen wir einmal auf die inter¬ 
nen Funktionen, die der Stack bei allen 
klassischen Rechnertypen innehat. 

PUSH und POP 

In erster Linie dient der Stack zur Spei¬ 
cherung von Rückkehr-Adressen. Da¬ 
bei geht er nach dem “Hansel und Gre- 
teP-Prinzip vor. Der jeweils zuletzt 
weggelegte Wert wird als erster vom 
Stapel zurückgenommen. Dieses Prin¬ 
zip bezeichnet man auch als "LIFO-Sy- 
steni” (Last In, First Out), im Gegen¬ 
satz zum “FIFO” (First In, First Öul). 
Die Tatsache, daß man den zuletzt ab¬ 
gelegten Wert folgerichtig als ersten 
zurücknimmt, hört sich recht trivial an. 
Die ganze Geschichte kann aber sehr 
schnell zu Problemen führen, wenn et¬ 
wa ein 32-ßit-Wert aufgeteilt und in 


zwei oder gar vier Portionen auf den 
Stack gelegt wird. Will man die Werte 
nun nicht “spiegelverkehrt” zurückbe¬ 
kommen. muß man die Reihenfolge 
beim Zurückholen genau umdrehen: 

PUSH IX 
PUSH DE 
PUSH HT. 

PO? HI, 

POP DE 
POP IX 

Der Zustand des Stacks wird dabei 
durch einen Zeiger oder auch Pointer, 
den sogenannten Stackpointer (kurz 
SP) angezeigt. 

Assembler-Programmierer können den 
Stackpointer auf verschiedene Arten 
nutzen. Über PUSH und POP kann man 
sehr schnell auf 16-Bit-Werte zugrei¬ 
fen. PUSH schiebt dabei einen I6-Bil- 
Registerwert auf den Stack, wobei der 
Stackpointer automatisch um den Wert 
Zwei (für 8 Bits eine Adresse) ernie¬ 
drigt wird. POP zieht den zuoberst lie¬ 
genden Wert (mit der niedrigsten 
Adresse) aus dem Stack heraus und in- 
krementiert den Stackpointer wieder 
um Zwei. 

Ein 16-ßit-Wert läßt sich nun sehr 
schnell und einfach durch ein Zusam¬ 
menspiel dieser Komponenten ver¬ 
schieben: 

PUSH IX ; kopiert den Inhalt 
;von IX 

?CP DE ; nach DF 

Würde man diesen Wert in klassischer 
Weise über 

LD (&4ü00) ,IX 
LD DE, (&4000) 

kopieren, so brauchte der Rechner 
dafür nicht bloß die doppelte Zeit - 
er würde darüber hinaus auch noch über 
3 Bytes Speicher verschenken. Und 
wer hat es speichermäßig schon so 
dicke? 

Wo man über PUSH und POP Ladcbc- 
fehleersetzen kann, sollte man auch un- 


Flaggenbezeichnung 

Abkürzung 

mögliche Sprungbedingung 

Vorzeichen-Flag 

S 

JP 

Zero-Flag 

Z 

JPundJR 

Pa r i t y - O v e r fl o w - FI ag 

P/V 

JP 

Carry-Flag 

c 

JPundJR 


Verschiedene Hags lassen sich für eine Schleifen-Abbruchbedingung verwenden 
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bedingt Gebrauch von dieser Möglich¬ 
keitmachen. 

Ansonsten empfiehlt der Assembler- 
spezi: Möglichst alle Parameter, die an 
ein Unterprogramm übergeben werden 
sollen, nicht in global (also im gesam¬ 
ten Programm verfügbar) gültigen Re¬ 
gistern halten, sondern über den Stack 
austauschen. 

Unterprogramme 

Die Register BC, DE, HL, IX und IY 
können sehr einfach direkt über “PUSH 
Registername” und entsprechend 
“POP Registername” Werte mit dem 
Stack austauschen. 

Bei der Übergabe von Werten an Unter¬ 
programme ist aber immer zu beachten, 
daß zusätzlich noch eine 16-Bit-Rück- 
sprungadresse auf dem Stack liegt. 

Um zwischenzeitlich Werte unterhalb 
des obersten Stack-Wertes oder aber 
auch bestimmte Effekte wie etwa einen 
direkten Rücksprung aus einer zweiten 
Verschachtelungsebene zu erreichen, 
muß der Stackpointer direkt manipu¬ 
liertwerden. 

Der Stackpointer zeigt dabei immerauf 
die niedrigste Adresse des Stacks. Vor 
einem Rücksprung ist der Stackpointer 
also kleiner als nach einem RET. 

Über die Befehle “INC SP” (erhöhe den 
Stackpointer) und “DEC SP” (erniedri¬ 
ge Stackpointer) sowie Ladebefehle 
kann der Wert des Stackpointers direkt 
beeinflußt werden. 

Ein fehlerhafter Wert des Stackpointers 
führt in jedem Fall zu einem unkontrol¬ 
lierten Rücksprung und Systemab¬ 
sturz. 


Der Stack verfügt - fast einem natürli¬ 
chen Gleichgewicht folgend - auch 
über einen Bruder, den sogenannten 
Heap (“Haufen”). Der Heap wächst im 
Gegensatz zum Stack von den niedri¬ 
gen Adressen ausgehend zu den hohen. 
Erwächst praktisch ins Bodenlose, und 
genau das ist auch sein Problem. 

Ein Hauch von MS-DOS 

Der Stack des CPC beginnt bei hexade¬ 
zimal BFFF, also genau unterhalb des 
Bildschirmspeichers. 

Der Heap liegt beim CPC also im Bild¬ 
schirmspeicher-Bereich. 

Der Stack baut sich zu den niedrigen 
Adressen hin auf. Die Oberfläche des 
Stacks bilden also die niedrigen Adres¬ 
sen. Bei Berechnungsfehlern oder aber 
einer zu hohen Verschachtelungstiefe 
durch Logikfehler kann es durchaus 
Vorkommen, daß Rücksprungadressen 
den Stack bis in den Bildschirm Spei¬ 
cherbereich aufblähen und dann zum 
Systemabsturz führen. 

Im Prinzip haben alle Rechnersysteme 
mit solchen Problemen zu kämpfen. Je 
nach Betriebssystem und Speicherauf¬ 
teilung muß der Programmierer jedoch 
mehr oder weniger starke Klimmzüge 
unternehmen, um Speicherbereichs¬ 
kollisionen zu vermeiden. Jedenfalls 
verfügen alle klassischen Systeme - 
egal, ob unter MS-DOS, Alari-TOS 
oderCP/M laufend-sowohl überStack 
als auch über Heap. Dennoch wird man 
sich wohl bald an wesentlich abstrakte¬ 
re Mechanismen gewöhnen müssen, 
denn sowohl Multitasking als auch 
Mulliuser-Betrieb kommen mit solch 



einfachen Regelungen nicht mehr aus. 
Ein weiterer Grund, dem übersichtli¬ 
chen CPC noch möglichst lange die 
Treue zu halten. 

Ausblicke 

ln der nächsten Assembler-Ecke wol¬ 
len wir uns etwas mit dem Laufzeitver¬ 
hallen von Assembler und der Codeop¬ 
timierung beschäftigen. Neben den in¬ 
ternen Zusammenhängen werden wir 
zeigen, wie man den Kampf um die 
Millisekunden gewinnt. Bis dahin “Gut 
Byte”, und behalten Sie einen kühlen 
Prozessor. 

(Ulrich Schmitz/sz) 


Literatur: 

" Peter Heiß: Z80-Maschinensprache- 
kurs. Heise- Verlag 
21 P. Immerz: Maschinensprachepro¬ 
gramme und Hardware-Ereiierungen 
für Sehne iderCPCs, IDEA - Verlag 


100 

ORG #4000 


110 

LD A, #02 


120 SCHL1: 

CALL #BC0E 

;Mode 2 einschalten 

130 

LD HL,#COOC 

/Anfang Bilds ch i rmspe i che r 

140 

LD IX, #AB8C 

/Anfang Bitmuster 

145 


/für CPC664/6128 #AB80 in 

147 


/#A67C ändern! ! 

150 

LD BC,#07DC 

/Anzahl Zeichen 

160 

CALL COPY 

/ Unterprogramm COPY 

170 

INC HL 

/Positionszähler + 1 

180 

DEC BC 

/Zeichenzähler - 1 

190 

LD A, B 

/Schleifenzähler 

200 

ORC 

/auf Null prüfen 

210 

JP NZ,SCHL1 

/ wenn BC 0 nach SCHL1 


220 

RET 

/BC = Ü, also zurück 

225 

230 COPY: PUSH HL 

/HL auf den Stapel sichern 

240 

PUSH IX 

/ IX ebenso sichern 

250 

LD DE,#0800 

/Zeilenabstand 

260 SCHL2: LD A, <1X+#G0) 

/Bitmuster in Akkumulator 

270 

LD (HL),A 

/ Akkuinhalt in Bildschirm- 

272 


/Speicher kopieren 

280 

INC IX 

/nächstes Byte 

290 

ADD HL, DE 

/nächste Zeile 

300 

JP NC, SCHL2 

/ solange kein CFlag 

310 

POP IX 

/ IX vom Stapel holen 

320 

POP HL 

/HL ebenso restaurieren 

330 

RET 

/ und zurück zum Hauptprg. 


Wer zum Eingehen des Listings den “CPC-Assembler" aus Heft 8/9’9J verwendet, muß jeweils ein “<£" für "ft" setzen. Über Stapel und Schleifen 
läßt sich übersichtlich und schnell kopieren - eine Grundvoraussetzung für Grafikprogramme und Scroll-Routinen 
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Dem Fehlerteufel 
auf der Spur 

Fehlerbehandlung mit BASIC 

Das interne BASIC ist wohl unbestreitbar die geeignetste Programmierspra¬ 
che für den CPC. An dieser Stelle wieder Tips für Sie zur B ASIC-Program- 
mierung. 


Computer sind interaktiv. Sie antwor¬ 
ten uns auf jede Eingabe mehr oder we¬ 
niger freundlich. Begrüßt man diese 
launischen Zeitgenossen mit einem 
freundlichen “Guten Morgen, CPC!”, 
antwortet dieser lapidar: “SYNTAX 
ERROR". 

Aber auch, wenn man den Computer 
mit “fließendem BASIC” füttert, lassen 
sich Fehler nicht vermeiden. Doch zum 
Glück gibt es die Möglichkeit, solche 
Fehlerabzufangen. 

In der Praxis heißt das, daß nach jedem 
aufgetretenen Fehler ein bestimmtes 
Unterprogramm aufgerufen wird. Dort 
kann der Fehler beseitigt werden, wie 
zum Beispiel eine Division durch Null, 
ein “File already open”- oderein "File 
type”-Fehler. Cs kann natürlich auch 
Vorkommen, daß es unmöglich ist, das 
Programm fortzusetzen. Das trifft dann 
zu, wenn beispielsweise der Speicher 
voll ist. eine Zeile nicht existiert oder 
ein NEXT-Befehl fehlt. Mit dieser 
Möglichkeit, auftretende Fehler abzu¬ 
fangen, werden Programme sicherer 
gemacht. 

Fehlerbehandlung ist daher nicht nur in 
professionellen Programmen ein Muß. 
Wenn in einem Programm Fehler auf- 
treten können, gehört es einfach dazu, 
daß diese behandelt werden. 

Schutz vor unangeneh¬ 
men Überraschungen 

Wie geht man nun am besten vor? Ein 
Blick ins BAS IC-Handbuch zeigt, daß 
es drei Befehle und zwei Funktionen 
gibt, die mit der Fehlerbehandlung zu 
tun haben. Am wichtigsten ist der Be¬ 
fehl zum Abfangen der Fehler: der“ON 
ERROR GOTO”-Befehl. Er teilt dem 
BASIC mit, daß im Fehlerfall das Pro¬ 
gramm an der angegebenen Zeile fort¬ 
gesetzt werden soll. Jetzt kann Ihr Pro¬ 
gramm genau feststellen, daß ein Feh¬ 
ler aufgetreten ist. Folgendermaßen 


würde das im Programmtext aussehen: 

10 ON ERROR GOTO 50 
20 PRINT "Ich mache jetzt 
einen Fehler !" 

30 Das ist falsch ! ! 1 
40 END 

50 PRINT "Irren isz 
menschlich ..." 

60 END 

Doch welcher Fehler es ist und wo er 
aufgetreten ist. ist für das laufende Pro¬ 
gramm immernoch unklar. Hier helfen 
die beiden Funktionen “ERR” und 
“ERL”. “ERR” gibt die Nummer des 
aufgetretenen Fehlers und “ERL” die 
Zeilennummer, in welcher der Fehler 
auftral, zurück. 

Beispiel: 

10 ON ERROR GOTO 4 0 
20 Da ist der Wurm drin 
30 END 

40 PRINT ''Der Wurm hat die Nummer 
ERR; "und ist in Zeile";ERL 
50 END 

Das Programm sagt, daß der “Wurm” 
die Nummer 2 hat und in Zeile 20 
steckt. Die Liste im BASIC-Handbuch 
verrät den Namen des Fehlers 2: “SYN¬ 
TAX ERROR”. 

Damit sind wir auch schon beim näch¬ 
sten Befehl. Er heißt “ERROR” und 
kann, w'ie der Name schon sagt, einen 
künstlichen Fehler auslösen. Sie kön¬ 
nen sich den Blick in die Tabelle erspa¬ 
ren, wenn Sie : “ERROR 2” eingeben 
und die ENTER-Taste drücken. Der 
Computer meldet: “SYNTAX ER¬ 
ROR ", w ie es i n der Tabcl le sieht. 

Worin liegt der Sinn dieses Befehls, 
außer den Griff zum Handbuch zu er¬ 
sparen? Er dient zum einen dazu, dem 
Benutzer wirklich schwere Fehler zu 
melden und das Programm abzubre¬ 
chen. Zum anderen kann man ihn aber 


auch dazu mißbrauchen, eigene Fehler 
zu behandeln, zum Beispiel bei einer 
Suchroutine den Fehler “Datensatz 
nicht gefunden”. 

Probieren Sie folgendes aus: 

5 REM "Array already öimen- 
sioned" v/ird mißbraucht 
10 notfcund%=10 
20 CN ERROR GOTO 70 
30 REM Suche, suche, . . . 

40 IF NOT gefunden TUEN ERROR 
notfound% 

50 PRINT "Alles Roger !" 

60 END 

70 REM Fehlerbehandlung 
80 IF ERR=notfound% THEN PRINT 
"Datensatz nicht gefunden ! ! !!" 
90 END 

Wichtig ist, daß die Variable, die ER¬ 
ROR übergeben wird, vom Typ Integer 
ist (das wird durch das “%”-Zeichen 
hinter der Variable festgelegt) und die 
verwendete Fehlernummer im Normal¬ 
fall nicht aultreten kann. 

Fehler selbst behandelt 

Etwas störend ist bei unserer Fehlerbe¬ 
handlung. daß sie bei einem Fehlerdas 
Programm beendet. Wenn es weiterge¬ 
hen soll, nimmt man den RESUME-Bc- 
fehl. Er sorgt dafür, daß die Fehlerrouti¬ 
ne genauso korrekt verlassen wird, wie 
sie betreten wurde. Er kehrt zur fehler¬ 
haften Zeile zurück und versucht es 
noch einmal mit ihr. Deshalb muß man 
hier besonders aufpassen, denn bei 
manchen Fehlern ist die Endlosschleife 
buchstäblich vorprogrammiert. Ein an 
diesen Befehl angehängtes “NEXT" 
veranlaßt das BASIC, in der Zeile mit 
dem Programmablauf fortzufahren, die 
der fehlerhaften folgt. 

Auch eine Zeilenangabe ist möglich. 
Dann macht der CPC nach dem RE- 
SUME bei dieser Zeile weiter. Dies ist 
dann sinnvoll, wenn so schwerwiegen¬ 
de Fehler auftreten, daß das Programm 
nicht mehr weitermachen kann. Denk¬ 
bar wäre zum Beispiel bei Ihrer selbst¬ 
gestrickten Textverarbeitung, daß die¬ 
se, wenn der Speicher voll ist, den ein¬ 
gegebenen Text abspeichert, bevor sic 
mit einem “Memory full”aussteigt. 
Doch jetzt auf zu einem kleinen Pro¬ 
gramm, das die Möglichkeiten der Feh¬ 
lerbehandlung ausnutzt, um dem Feh¬ 
lerteufel eins auszuwischen. Es ist ein 
Programm, das eine ASCII-Datei am 
Bildschirm anzeigt. Leider können nur 
reine Text-Dateien eingelesen und an- 
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gezeigt werden, bei einem anderen Da¬ 
teityp gibt es einen “File type error”. 
Nun ist es kein allzu großes Problem 
mehr, diesen Fehler abzufangen, aber 
was dann? Das Programm könnte zum 
Beispiel daraufhinweisen, daß man nur 
ASCII-Dateien angeben darf, und er¬ 
neut starten. 

Wie Sie vielleicht schon bemerkt ha¬ 
ben, werden Diskettenfehler nicht ab¬ 
gefangen. Der CPC 464 kann diese Art 
von Fehlern in BASIC nicht behandeln, 
bei seinen großen Brüdern gibt es da et¬ 
was mehr Möglichkeiten. Da wir aber 
fürs erste unsere Programme kompati¬ 
bel halten wollen, begnügen wir uns 
vorerst mit den etwas bescheideneren 
Möglichkeiten. Da unsere Programme 
nun unbeeindruckt von Fehlern ihren 
Dienst verrichten, ist es an der Zeit, sich 
zu überlegen, wie man den Fehler behe¬ 
ben kann. Denn was nützt die beste und 
eleganteste Fehlerbehandlung, wenn 
das Programm über einen Fehler nach 
dem anderen stolpert? Oder, noch 
schlimmer, wenn ein logischer Fehler 
dazu führt. daß der Computer sich in ei¬ 
ne Endlosschleife verrennt? 

Dann ist guter Rat teuer. Aber glückli¬ 
cherweise läßt uns unser “good old BA¬ 
SIC” nicht im Stich. Eine effektive Me¬ 
thode, Fehler zu suchen, ist bereits ein¬ 
gebaut, in Form von den Befehlen 
“TRON” und “TROFF”. 

Ein Tracer ist eingebaut 

’"fRON” startet den Trace-Modus. 
“Trace” ist Englisch und heißt auf 
deutsch Spur. Ab jetzt hinterläßt der 
CPC eine Spur, indem er die Nummern 
aller Programmzeilen, die er gerade be¬ 
arbeitet, am Bildschirm ausgibt. Wenn 


sich nun der CPC festfährt, sieht man 
genau, in welcher Zeile das geschieht. 
Diese Methode bringt aber nur etwas 
bei wirklich hartnäckigen Fehlern. 
Meistens ist es einfacher, an bestimm¬ 
ten Stellen einen Text ausgeben zu las¬ 
sen oder Variablen anzuzeigen. Denn 
der TRON-Befehl liefert, wenn er nicht 
sehr gezielt eingesetzt wird, eine riesi¬ 
ge Anzahl von Zeilennummern. Bis 
man sich da hindurchgekämpft hat, ist 
der Fehler meist schon “per Hand” ge¬ 
funden. 

Betrachten wir folgendes Beispiel: 

10 CLS 
2C A=A+1 
30 GOTO 20 

Nach dem Start erhöht der CPC die Va¬ 
riable A immer um 1. Wenn wir zuerst 
TRON eingeben, sehen wir folgendes 
Bild: 

[20113011201 [30] [20] [30] .... 

Das mag ja gerade noch überschaubar 
sein, aber bei einer größeren Schleife 
erkennt man nicht mehr viel. Deshalb 
ist es viel sinnvoller,denTRON-Befehl 
an einer bestimmten Stelle ins Pro¬ 
gramm einzubauen. Dadurch werden 
nur die interessanten Stellen ausgege¬ 
ben. Denn einen Vorteil hat der TRON- 
Befehl gegenüber einem PRINT-”Hier 
bin ich”-Befehl, er zeigt die Zeilen¬ 
nummer an. Hierdurch ist eine gezielte¬ 
re Fehlersuche möglich. 

Haben Sie den TRON-Befehl ins Pro¬ 
gramm eingebaut, werden Sic merken, 
daß da noch etwas fehlt. Sie können den 
Trace-Modus nämlich noch nicht rück¬ 
gängig machen. Da hilft uns der 
TROFF-Befehl aus der Patsche. Er be¬ 
endet den Trace-Modus. Oft ist es bei 
der Fehlersuche mit FRON und 
TROFF auch hilfreich, einen 1.0- 


CATE-Befehl ins Programm einzubau¬ 
en. Vor allem bei Schleifen zahlt sich 
das aus. Dann erzeugt nämlich die 
Schleife, die tausendmal durchlaufen 
wird, nicht tausende von Zeilennum¬ 
mern am Bildschirm, sondern nur ein 
paar, wie folgendes Beispielpro¬ 
gramm: 

2 TRON 

5 REM Tue es 1000 mal 
10 FOR z= 1 to 1000 
20 REM Was denn ? 

25 LÜCATE 1, 3 
28 PRINT "Schleife: 

3C NEXT 
35 TROFF 

Angesichts dieser Möglichkeiten, Pro¬ 
grammfehler zu suchen und sie zu be¬ 
heben, stellt sich natürlich die Frage, 
wie BASIC im Vergleich mit anderen 
Progra m m i e rs p rache n a bsc hn e i de t. 
Wenn man BASIC mit Compilerspra¬ 
chen, wie zum Beispiel Turbo Pascal, 
vergleicht, wird man bei der Fehlersu¬ 
che sein BASIC schätzen lernen. Si¬ 
cher, Turbo Pascal ist zwar wesentlich 
schneller als BASIC, aber nicht so be¬ 
quem. 

Wenn ein compiliertes Programm aus- 
steigl, sind in der Regel alle Daten ver¬ 
loren. 

In BASIC hat man zumindest noch die 
Möglichkeit, Variableninhalte auszu¬ 
drucken oder zu speichern. 

BASIC eignet sich sehr gut für die Rea¬ 
lisierung von spontanen Ideen, weil 
Änderungen schnell und einfach durch¬ 
geführt werden können. Wir hoffen. 
Ihnen mit diesen Anregungen etwas ge¬ 
holfen zu haben. 

Markus Kräutner/jg 


10 REM ****************************** 

[1365] 


260 

/ 

[117] 

20 REM *** *** 

[417] 


270 

REM erhoehe y 

[369] 

30 REM *** ASCII-Filelister *** 

[1272] 


280 

y=y+l 

[ 809 ] 

40 REM ***(c)1991 Markus Kraeutner*** 

[2459] 


290 


(117] 

50 REM *** & CPC International *** 

[ 1979 ] 


300 

REM Gib String aus 

[1744] 

60 REM ***fuer 464, 664, 6128(plus)** 

[1592] 


310 

PRINT text$ 

[341] 

70 REM ****************************** 

[1365] 


320 


[117] 

80 ' 

[117] 


330 

REM y>24 ? 

[480] 

90 REM Fehlerbehandlung ein 

[1668] 


340 

IF y>24 THEN y=0:WHILE INKEY$="":WEND 

[1873] 

100 ON ERROR GOTO 420 

[1345] 


350 


[117] 

110 ' 

[117] 


360 

REM Schleifenende 

[1099] 

120 REM Inhaltsverzeichnis zeigen 

[2054] 


370 

WEND 

[ 390 ] 

130 MODE 2:CAT 

[1242] 


380 


[117] 

140 ' 

[117] 


390 

REM ENDE 

[410] 

150 REM Dateinamen lesen 

[1024] 


400 

END 

[110] 

160 INPUT "Dateiname :",name$ 

[1685] 


410 

/ 

[117] 

170 ' 

[117] 


420 

REM Fehlerbehandlung 

[1600] 

180 REM Datei oeffnen 

[769] 


430 


[117] 

190 OPENIN name$ 

[1050] 


440 

REM File type error ? 

[1853] 

200 ' 

[117] 


450 

IF ERR=25 THEN CLS:PRINT "Es koennen n 

[6369] 

210 REM Wiederhole 

[1309] 


ur ASCII-Files angezeigt werdenCALL &BB 


220 WHILE NOT EOF 

[ 1840] 


06:RESUME 10 


230 ' 

[117] 


460 

/ 

[117] 

240 REM Lese String ein 

[2380] 


470 

REM Fehler ausloesen 

[1353] 

250 LINE INPUT #9,text$ 

[1642] 


480 

ERROR ERR 

[944] 
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Den Ausweg im Blick 

Serie: Der Weg zum eigenen 
Rollenspiel-System 

Ein gutes Rollenspiel braucht nicht nur eine reizvolle Story und ein Mindest¬ 
maß an Dialogmöglichkeiten, sondern auch ein “Szenario”, also was fürs Au¬ 
ge. Eine besonders dankbare Basis für Abenteuer aller Art mit immer wieder 
anderen Schauplätzen und wechselnder Athmosphäre bieten rechnererzeug¬ 
te Labyrinthe. Wir stellen Ihnen diesmal einen Algorithmus zur Herstellung 
dieses “Cyper-Spacing im kleinen” vor. 


Wer einmal im schönen Hannover ver¬ 
weilt, sollte auf jeden Fall die Herren- 
häuserGärten besuchen. Ini Herzendes 
“Großen Gartens” lockt das quadrati¬ 
sche Heckenlabyrinth Jugendliche wie 
Erwachsene in seine verschlungenen 
Gänge. Wer dort jedoch einmal den 
streng geometrischen Aufbau durch¬ 
blickt und den richtigen Weg gefunden 
hat, wird beim nächsten Versuch kaum 
noch Schwierigkeiten haben, den Aus¬ 
gangerneut aufzuspüren. 

Damit unsere Rollenspiel-Labyrinthe 
nicht auch so schnell Langeweile auf- 
kommen lassen, müssen sie eine wich¬ 
tige Bedingung erfüllen: Sie sollen 
zwar leicht herzustellen sein, dürfen 
aber keinesfalls ein einheitliches, leicht 
wiedererkennbares Baumuster aufwei¬ 
sen. 

Da bekanntlich viele Wege nach Rom 
führen, wollen wir Ihnen verschiedene 


Systeme und Lösungen vorstellen. Bei 
unserem ersten Lösungsversuch baut 
der Rechner, gesteuert über einen Zu¬ 
fallsgenerator, ein mehrstöckiges La¬ 
byrinth auf. 

Wer sucht, der findet 

Um einen sinnvollen Ansatz für die 
Plazierung von Schätzen und Gegnern 
zu bieten, lassen wir den CPC auch 
noch den idealen Ausgangsweg aus 
dem Irrgarten berechnen. 

Um die ganze Sache etwas anschauli¬ 
cher zu machen, bauen wir uns dafür ei¬ 
ne kleine Spielfigur aus ein paar Zei¬ 
chen des leicht aufgemotzten ASCII- 
Zeichensatzes zusammen, den der CPC 
dankenswerterweise zur Verfügung 
stellt. Unser Held fängt dabei in der 
obersten Etage an und bahnt sich Stock¬ 
werk für Stockwerk den Weg ins Freie. 


Dabei macht er natürlich Fehler. Beim 
zweiten Durchgang gehl er dann alter¬ 
native Strecken und findet so am 
Schluß unausweichlich den optimalen 
Weg ins Freie. Eine solche Steuerung 
bietet sich auch hervorragend für Mon¬ 
ster aller Klassen an. Es gibt für Rollen¬ 
spieler wirklich nichts Öderes als ein 
Monster in einem Labyrinth, das bei der 
Verfolgungsjagd plötzlich in eine 
Sackgasse gerät und aufgrund fehlen¬ 
der Intelligenz ständig gegen eine 
Wand oder Ecke rennt, ohne je wieder 
aus dieser Situation herauszukommen. 

Hindernisse überwinden 

Bei unserem zweiten Programm wird 
ein geschlossenes Labyrinth aufge¬ 
baut, dessen Elemente sich ganz zufäl¬ 
lig zusammensetzen. Dabei kann es 
Vorkommen, daß “Kollege Computer” 
im Übereifer den einzigen Weg zum 
rettenden Ausgang verbaut. Aus die¬ 
sem Grund wird nach Fertigstellung 
des Labyrinthsein Probelauf gemacht. 
Im Programm haben wir eine Kopie des 
Labyrinths in dem Feld “LABY” abge¬ 
legt. Wie Hänsel und Gretel im Mär¬ 
chenwald Brotkrümel verstreuten, ver¬ 
streuen wir vom Eingang aus einen 
Markierungswert in Richtung Aus¬ 
gang. Kommt nach Ausnutzung aller 
Gänge keine Verbindung zustande, 
muß ein neues Labyrinth generiert wer¬ 
den. 

Über die Variablen “D1 ” und “D2” läßt 
sich je nach Geschmack ein sehr lufti¬ 
ges weites Areal oder aber ein aus vie¬ 
len Winkeln und Ecken bestehendes 
Szenarium erstellen. In unserem Pro¬ 
gramm haben wir die Variable “TICK” 
als Abbruchkriterium bei der Suche 
nach einem Ausgang festgelegt. Gibt es 
keine Verbindung zwischen Ein- und 
Ausgang, erzeugt der CPC ein neues 
Labyrinth. Alternativ dazu könnte man 
natürlich auch zu härteren Maßnahmen 
greifen und kurzentschlossen ein paar 
Mauern durchbrechen. Die vorgestellte 
Lösung versteht sich auch nur als Anre¬ 
gung und Einstiegsmodell für eigene 
Labyrinthe. 

Variable Gestaltung 

Natürlich empfiehlt es sich, die Matri¬ 
zen errechneter brauchbarer Laby¬ 
rinthe in einer Datei auf Diskette abzu¬ 
speichern. Bei Verwendung der vorein¬ 
gestellten Werte für “Dl” und “D2” ist 
es bei über 1 OOTestläufen kein einziges 
Mal vorgekommen, daß Ein- und Aus- 
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gang keine Verbindung zueinander ge¬ 
habt hätten. Wem die abschließende 
Prüfroutine zu bummelig ist. der kann 
si e bei d i e ser E i n stel I u ng ge t rost en t fe i- 
nen. 

Denkanstöße 

Nachdem wir nun das Gangbare im 
Rahmen zweidimensionaler Laby¬ 
rinthe vorgestellt haben, wollen wir zu 
weiteren Experimenten ermuntern. Der 
Urtyp aller Labyrinthe findet sich wohl 
unzweifelhaft im sagenumwobenen 
Labyrinth des Königs Minos von Kreta. 
König Minos war der Sage nach ein 
Sohn des Zeus und der Europa. Als Kö¬ 
nig von Kreta soll er in einer schwachen 
Stunde einen von Poseidon gesandten 
Stier nicht zum Opfer gebracht, son¬ 
dern zurückbehalten haben. Die Rache 
folgte natürlich auf dem Fuße. Seine 
holde ihm angetraute Pasiphae betrog 
ihn ausgerechnet mit Poseidons Stier 
und gebar aus dieser Verbindung den 
Minotaurus. Den wiederum sperrte Mi¬ 
nos in ein steinernes Labyrinth, das er 
vom genialen Konstrukteur Daedalos 
bauen ließ (genau, dem Vater von Ika¬ 
ros!). In das Labyrinth des Minotaurus 
wurden, so die Sage, jährlich sieben 
Jungfrauen und sieben Jünglinge hin¬ 
eingeworfen. Dem Spuk w'urde erst ein 
Ende bereitet, als Theseus in das Laby¬ 
rinth eindrang und den Minotaurus - 
ein Mischwesen mit dem Körper eines 
Menschen und dem Kopf eines Stieres 
- erlegte. 

Werden Sie jetzt bitte nicht ungeduldig, 
denn: Unser kleiner Ausflug in die grie¬ 
chische Mythologie ist kein reiner 
Selbstzweck - schon sind wir wieder 
bei unseren Labyrinthen! 

Fantastische 

Vergangenheit 

Da Theseus, w ie die Sage berichtet, sei¬ 
nen Weg ins Labyrinth hinein mit Hilfe 
eines abgewickelten Fadens markiert 
hatte, fand er nach Erledigung des Pro¬ 
blems Minotaurus auch wdeder hinaus. 
Diesen Faden, der unserer “Markie¬ 
rungsspur” im zweiten Labyrinthpro¬ 
gramm nicht unähnlich ist, hatte Ariad¬ 
ne, die Tochter des Minos, am Eingang 
zum Labyrinth befestigt. Er hat unter 
der Bezeichnung “Ariadnefaden” Ein¬ 
gang in Literatur und Sprache gefun¬ 
den. 

Einige Gelehrte 2 * haben sich nun Ge¬ 
danken darüber gemacht, warum es 
denn unbedingt ein Faden sein mußte. 


und nicht einfache in Stein oder Boden 
gezeichnete Markierungen genügten. 
Auch die "Hansel und Gretel”-Metho¬ 
de wdire für ein normales zweidimen¬ 
sionales Labyrinth völlig ausreichend 
gewesen, und an Drachmen soll es The¬ 
seus ja nicht gemangelt haben. 

Der einzig logische Grund für die Ver¬ 
wendung eines Fadens zur Standortbe¬ 
stimmung scheint in dem Wesen des 
Labyrinths begründet zu sein. Wenn es 
eben nicht nur aus rechts, links oder ge¬ 
radeaus verlaufenden Gängen bestan¬ 
den hätte, dann würde eine derartige 
“Lebenslinie”Sinn machen. 

Mehrspurig denken 

Bei einem dreidimensionalem Laby¬ 
rinth wäre ein Faden in der Tat die ein¬ 
zig sinnvolle Orientierungshilfe. Aus- 
gelegte Münzen. Markierungen oder 
aber auch Linsen in Anleihe an deut¬ 
sche Märchen hätten in diesem Fall bei 
König Minos nur zu Lachkrämpfen ge¬ 
führt. 

Aber auch für dreidimensionale Laby¬ 
rinthe läßt sich ein sehr einfacher 
Fluchtalgorithmus entwerfen, der ohne 
Ariadne- oder sonstige Fäden aus¬ 
kommt. 

Von der Datenstruktur her sind die so¬ 
genannte “Depth-Firsl-Search” oder 
auch die “Backtrack”-Methode interes¬ 
sant. Bei “Depth-First Search” ver¬ 
sucht man möglichst tief in ein Laby¬ 
rinth hineinzugehen, ohne Abzweigun¬ 
gen zu benutzen. Bei der “Backtrack”- 
Methode tritt die schon erwähnte Spur¬ 
verfolgung in Aktion. 

Vom Eintritt in den Irrgarten an hält 
man sich unablässig an der rechten 
Außenwand. Bei Abzweigungen folgt 
man entsprechend der abzweigenden 
Wand, ln einer Sackgasse dreht man 
sich am Ende links herum und folgt 
weiter der rechten Seite. 

Beherzt man diese Regel, w-ird man 








d: 

1. FluchtversucJ 

2, Fluchtversuch 

113 Sekunden 

93 Sekunden 


Ergebnis des ersten Programms: die Figur hat 
ihren Weg durch die Stockwerke gefunden 


zwar nicht unbedingt den kürzesten, 
aber auf jeden Fall einen möglichen 
Weg heraus finden, zumindest in zwei¬ 
dimensionalen Labyrinthen. 

Nur Labyrinthe, die einen geschlosse¬ 
nen Kreis ohne Öffnung bilden, trotzen 
dieser einfachen Fluchtmethode, 
ln dreidimensionalen Labyrinthen nun 
ist diese einfache Regel nur um eine 
Kleinigkeit zu ergänzen. 

Gänge, die nach oben oder unten 
führen, werden mit einer Richtungs¬ 
zahl versehen. Ebenso Gänge in Nord- 
Süd- und Osl-West-Richtung. 


Richtung 
Oben-Unten 
Nord-Süd 
Ost-West 


Richtungszahl 

1 

2 

3 


Ariadne-Ersatz 

Trifft man aus Richtung 1 kommend 
nun auf eine Kreuzung, verläßt man sie 
in Richtung 2. Aus Richtung 2 kom¬ 
mend geht man in Richtung 3, und aus 3 
kommend in Richtung 1. 

Beherzt man diese Regel in Verbindung 
mit dem vorher Gesagten, wird kein 
Gang zweimal durchlaufen. Man darf 
dann ziemlich sicher sein, auch aus ei¬ 
nem dreidimensionalen Labyrinth ir¬ 
gendwann einmal zu entkommen. 

Ul rieh Schm itz/sz 


Literatur: 

"Gerd Kebschull: Computer-Knobelei- 
en. Heise Verlag 

'' A.K.Dewdney: Im Labyrinth des Mi¬ 
notaurus, Spektrum der Wissenschaft. 
Sammelausgabe Computer-Kurzweil III 
"/l .K.Dewdney: Robot ropolis, Spek¬ 
trum der Wissenschaft. Sammelausgabe 
ComputeKurzweil II 
" Ralf Grafe: Der Faden der Ariadne. 
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Dieses vom zweiten Programm erzeugte Zu- 
fallslabyrinih war gangbar: 

Der CPC hat den Ausweg gefunden 
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100 REM * Das Programm demonstriert die * [1554] 

110 REM * Berechnung des optimalen 

Wegs * [2378] 

120 REM * aus einem computererzeugten * [2554] 

130 REM * Gangsystem heraus. 

* [2990] 

140 REM * (c) 199 1 U.Schmitz & CPC Int. * [2084] 

150 DIM TOR(18) 


[ 659 ] 

160 MODE 2: TIMER = (INT(TIME/300) 

[1700] 

170 FOR I = 1 TO 7 


[447] 

180 FOR J = 1 TO 80 


[770] 

200 LOCATE J, 1*2+2 : PRINT CHR$(208), 

[1700] 

210 NEXT J 


[370] 

220 TOR(1*2+2)=INT(RND*79+1 ) 

[1563] 

230 TOR=TOR(1*2+2) 


[844] 

240 LOCATE TOR,1*2+2: 

?RINT " " 

[2110] 

260 NEXT I 


[ 375 ] 

270 ZEIT = TIMER 


[875] 

280 Y=3 : X=1 


[490] 

290 IF X=1 THEN VORW= 

1 

[724 ] 

295 IF X=80 THEN VORW 

=0 

[1191] 

300 IF VORW=l THEN X= 

X+l ELSE X=X-1 

[840] 

310 FOR I = 1 TO 10 


[315] 

320 NEXT I 


[375] 

330 IF X=TOR(Y+l ) THEN Y=Y+2: IF Y= 

17 THEN [1724] 

420 



340 LOCATE X,Y 


[672 ] 

350 N=N+1: IF N > 4 THEN N = 1 

[1341] 

360 PRINT CHR$ ( 247+N ) 


[983] 

370 FOR W = 1 TO 250 

: NEXT W 

[707] 

380 LOCATE X,Y:PRINT 

1 fl 

[747 ] 

400 GOTO 290 


[411] 

420 LOCATE 1,20 


[ 732 ] 

430 TIMER = ( INT(TIME/300 ) ) 

[1698] 

440 PRINT "1. Fluchtversuch ";TIMER-ZEIT; " [4541] 

Sekunden" 



450 REM Jetzt mit etwas mehr Power 

[2739] 

460 DEFINT X,Y 


[556] 

470 ZEIT = TIMER 


[875] 

480 Y=1 : EPS=1 : X=0 : Y=Y+2 

[837] 

520 X=X+EPS 


[1110] 

530 IF X=0 THEN EPS=1 


[556] 

540 IF X=80 THEN EPS = 

-1 

[1085] 

550 IF X=TOR(Y+l) THEN Y=Y+2:IF TOR(Y+l)>X [5071] 

THEN EPS = 1 ELSE EPS = 

-1:IF Y=17 THEN 630:E 

LSE GOTO 550 



560 LOCATE X,Y 


[ 672 ] 

570 N=N+1 : IF N > 4 THEN N = 1 

[1341] 

580 PRINT CHR$(247+N) 


[983] 

590 FOR W = 1 TO 250 

: NEXT W 

[707 ] 

600 LOCATE X,Y:PRINT 

" ": GOTO 520 

[1110] 

630 LOCATE 1,21 


[735] 

640 TIMER = ( INT ( TIME/300 )) 

[1698] 

650 PRINT "2. Fluchtversuch "; TIMER-ZEIT; " [4249] 

Sekunden" 



660 IF X > 1 THEN X = 

X -1 ELSE 740 [1316] 

670 LOCATE X,Y 


[ 672 ] 

680 N=N+1 : IF N > 4 THEN N = 1 

[1341] 

690 PRINT CHR$(247+N) 


[983] 

700 FOR W = 1 TO 250 

: NEXT W 

[ 707 ] 

710 LOCATE X,Y:PRINT 

" " :GOTO 660 

[1082] 

740 LOCATE X,Y 


(672 ] 

750 PRINT CHRS(250) 


[854] 

760 FOR W = 1 TO 250: 

NEXT W 

[ 707 ] 

770 LOCATE X,Y:PRINT 

II It 

[747] 

790 LOCATE X,Y+1:PRINT CHR$(250) 

[1251] 

810 FOR W = 1 TO 250: 

NEXT W 

[ 707 ] 

820 LOCATE X, Y+l:PRINT " " 

[856] 

840 LOCATE X+l,Y+1:PRINT CHR${250) 

[2085] 

860 LOCATE X+2,Y:PRINT CHR$(223) 

[2057 ] 

880 LOCATE X+2,Y+l : PRINT CHRS(211) 

[1099] 

900 LOCATE 1,1 : END 


[707] 

100 REM * Labyrinthmodul f. Rollenspiel * [2841] 

110 REM * Generiert ein 2-D-Labyrinth * [2301] 

120 REM * und testet 

es auf vorhandene * [2374] 

130 REM * Durchgaenge 

sowie Fluchtmoeg- * [2139] 

140 REM * lichkeiten 


* [1267] 

150 REM * (c ) 1991 U.Schmitz & CPC-Int. * [2230] 

160 DIM LABY(80,25) 


[588] 

170 FOR I = 1 TO 25 


[312] 

180 FOR X = 1 TO 80 


[789] 

190 LABY ( X,I ) = 0 


[562] 

200 NEXT X 


[356] 

210 NEXT I 


[375] 

220 MODE 2 


[513] 

240 Dl = 6 :REM Labyrinthdichte bestimmen [2363] 

260 D2 = 6:REM Dichte 

der Querstreben [1172] 

270 REM * Labyrinthrahmen zeichnen 

[3284] 

280 FOR X = 1 TO 24 


[765] 

300 LOCATE 1,X:PRINT 

CHR$(127); 

[1643] 


310 LABY (1,X) = 1 

[794] 

320 NEXT X 

[ 356] 

330 FOR X = 1 TO 80 

[789 ] 

350 LOCATE X,l:PRINT CHRS(127); 

[1256] 

360 LABY(X,1) = 1 

[ 370] 

370 NEXT X 

[356] 

380 FOR X = 1 TO 80 

[789] 

400 LOCATE X,25:PRINT CHR$(127); 

[1706] 

410 LABY (X,25)=1 

[320] 

420 NEXT X 

[356] 

430 FOR X = 1 TO 24 

[765] 

450 LOCATE 80,X:PRINT CHRS(127); 

[1469] 

460 LABY (80,X) = 1 

[653] 

470 NEXT X 

[ 356 ] 

480 REM * Waagerechte Balken einziehen 

[1227] 

490 FOR P = 2 TO 24 STEP 2 

[782 ] 

500 ZU = 0 

(611 ] 

510 FOR I = 1 TO 79 

[ 326] 

520 IF ZU > 0 THEN 550 

[11401 

530 IF ZU = 0 THEN ZU = -1 : GOTO 590 

[1376] 

540 ZU = INT(Dl*RND(1)+2) 

[2514 ] 

550 LOCATE I,P 

[737] 

560 ZU = ZU - 1 

[1066] 

570 PRINT CHRS(127); 

[1325] 

580 LABY(I,P) = 1 

[473] 

590 NEXT I 

[375] 

600 NEXT P 

[364] • 

610 REM * Senkrechte Zwischenbalken 

[1896] 

620 ZU = 4 

[623] 

630 FOR P= 2 TO 24 

[665] 

640 FOR I = 1 TO 79 

[ 326 ] 

650 IF ZU = 0 THEN LOCATE I,P: PRINT CHR 

[3198] 

$(32);: ZU = INT(D2*RND(1)+3):LABY(I,P)=0 


660 ZU = ZU - 1 

[ 1066] 

670 NEXT I 

[ 375 ] 

680 NEXT P 

[ 364] 

690 REM * Sperrwaende aufstellen 

[640 ] 

700 ZU = 4 

[623] 

710 FOR P= 3 TO 23 STEP 2 

[1579] 

720 FOR I = 1 TO 79 

[326] 

730 IF ZU = 0 THEN LOCATE I,P: PRINT CHR 

[3468] 

$(127);: ZU = INT(D2*RND(1)+5) : LABY(I,P) 


740 ZU = ZU - 1 

[1066] 

750 NEXT I 

[375] 

760 NEXT P 

[364] 

770 REM * Ein- und Ausgaenge festlegen 

[2917] 

780 Xx = INT(70*RND(1)) 

[650] 

790 Yy = INT(70*RND(1) ) 

[1574] 

800 LOCATE Yy,l:PRINT " EINGANG " 

[1648] 

820 FOR E = 0 TO 8 

[884] 

830 LABY (Yy + E, 1) = 11 

[212] 

840 NEXT E 

[379 ] 

850 LOCATE Xx,25:PRINT " AUSGANG " 

[2806] 

870 FOR A = 0 TO 8 

[756] 

880 LABY (XX + A, 25) = 99 

[486] 

890 NEXT A 

[ 383] 

900 REM * Probelauf: Gibt es eine Verbind 

[2544] 

ung zwischen Ein- und Ausgang? 


910 REM * 1 - Stein, 0 =-freies Feld, 2 = 

[3656] 

Pruefwert 


920 REM * 99 = Ausgang, 11 = Eingang 

[1275] 

930 PRUEFUNG = 1 

[ 567 ] 

940 TICK = O 

[586] 

950 WHILE PRUEFUNG = 1 

[1267] 

960 TICK = TICK + 1 

[1516] 

970 FOR X = 2 TO 79 

[628] 

980 FOR Y = 1 TO 24 : REM Alle Zeilen 

[1761] 

990 IF (LABY(X,Y) = 11 AND LABY(X,Y+1) 

[3971] 

= 0) THEN LABY(X,Y+l) = 2 


1000 IF (LABY(X,Y) = 2) THEN 1020 

[1905] 

1010 GOTO 1070 

[317] 

1020 IF LABY(X+l,Y)=0 THEN LABY(X+1,Y) 

[2739 ] 

=2:LOCATE X+l,Y:PRINT CHR$(144) 


1030 IF LABY(X-l,Y)=0 THEN LABY(X-1,Y) 

[4115] 

=2:LOCATE X-l,Y:PRINT CHRS(144) 


1040 IF LABY(X,Y+l)=0 THEN LABY(X,Y+1) 

[1794] 

=2:LOCATE X,Y+l:PRINT CHRS(144) 


1050 IF LABY(X,Y-l)=0 THEN LABY(X,Y-1) 

[4040] 

=2:LOCATE X,Y-l:PRINT CHRS(144) 


1060 IF LABY(X,Y+l)=99 THEN PRUEFUNG=0 

[2955] 

:Y=25:X=80 


1070 NEXT Y 

[359] 

1080 NEXT X 

[356] 

1090 WEND 

[390] 

1100 IF (TICK > 20) THEN 170 : REM Labyrin 

[4577] 

th hat keinen gangbaren Ausweg 


1110 LOCATE Xx,25:PRINT " AM ZIEL ";:LOCA 

[4226 ] 

TE Yy,1 


1140 END 

[110] 
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Bericht 


Was der CPC alles kann 


Demoprogramme auf dem CPC 

ln der sogenannten Szene ist es gang und gäbe, daß jeder, der etwas auf sich 
hält, eine Demo schreibt. Wieviel Arbeit in so einer Demo steckt und was es al¬ 
les an Demos für den CPC gibt, wollen wir Ihnen aufzeigen. 


Dieser ArtikeI soll einen Einblick in die 
Demos der internationalen CPC-S/ene 
geben. 

Eine Demo besteht normalerweise aus 
einer guten Grafik, die das Logo des 
Programmierers oder ähnliches bein¬ 
haltet, einem Scrolltext. der in allen 
möglichen Varianten über den Bild¬ 
schirm gleitet, sowie aus Sound und 
Rastern. In den meisten Fällen sind die 
Demos im Overscan-Modus, sprich in 
einem speziellen Grafikmodus, der den 
ganzen Bildschirm ausnutzt, geschrie¬ 
ben. Wer wirklich gute Demos machen 
will, muß über sehr viel Wissen in Sa¬ 
chen CPC-Programmierung verfügen, 
zumal jeder Demoschreiber bemüht 
sein sollte, so wenig Betriebssystem- 
routinen wie möglich zu benutzen. 

An einer guten Demo wie zum Beispiel 
The Demo, Terrific-Demo Stage I, 
BSC Megademo sowie der BTA-Demo 
I und vielen anderen sitzen der oder die 
Programmierer mitunter ein ganzes 
Jahr. Die Demo wird ja neben Schule 
oder Beruf geschrieben. 

Das größte Problem der Demoschrei¬ 
ber ist es, die nötigen Ideen für einen 
neuen Part zu finden. BSC zum Bei¬ 
spiel hatte nicht viele Ideen, und das 
verzögerte natürlich das Erscheinen 
der Megademo von ihm ebenfalls. 
Auch die Motivationen sind von Fall zu 
Fall unterschiedlich. Während die ei¬ 
nen eine Demo schreiben, um die 
ASM-Democompetition zu gewinnen, 
schreibt der andere Demos, um seine 
Programmierkunst zu beweisen und 
auch die Fähigkeiten seines Rechners 
demonstrieren zu können. Es gibt aber 
auch Leute, die sich ihr Taschengeld 
dadurch aufbessern, daß sie für andere, 
die nicht in Assembler programmieren 
können, das Demowriting überneh¬ 
men. Einer der wichtigsten Gründe ist 
jedoch, daß man neue Kontakte knüp¬ 
fen kann. Das bestätigt schon die Ant¬ 
wort von BSC auf die Frage, warum er 
denn Demos schreiben würde: “Damit 
ich Kontakte zu anderen Demopro¬ 
grammierern finde, also zur Szene.” 

Die Qualität der Demos ist sehr unter¬ 


schied I i c h - d i e P rog ra mmierung e be n - 
falls. Nach wie vor kommen immer 
noch sehr gute Demos heraus, wo man 
nur noch ins Staunen und Schwärmen 
gerät. 

Die Scrolltexte der Demos, egal ob aus 
Deutschland oder Frankreich, sind 
mittlerweile fast nur noch in Englisch, 
da so die Verständigung international 
gewährleistet ist. 

Wer jetzt meint, er programmiert unter 
BASIC eine Demo, der wird herb ent¬ 
täuscht werden. Die Mindestanforde¬ 
rung der Szene ist Assembler. Aber 
jetzt genug hiervon, schauen wir uns 
doch erst einmal eine Demo an: 

The Demo 4.0 

Coding: Logon System 

The Demo gehört zu den besten Demos, 
die es je für den CPC gab (Gegendemos 
sind in Arbeit - Chain-Demo, Paradise 
Demo). Nach einer kurzen Begrüßung 
wird das Menü geladen - mit Musik 
während des Ladevorgangs! Nach ei¬ 
ner entsprechenden Ladezeit (zirka ei¬ 
ne Minute) präsentiert sich dann ein 
Menü, wobei im Hintergrund ein vom 
Atari ST übernommener Sound abge¬ 
spielt wird. 

In diesem Menü, das einem bekannten 
Spiel recht ähnlich sieht, können nun 


die einzelnen Demoparts mittels eines 
Raumgleiters abgeschossen werden. 
Daraufhin werden diese dann geladen. 
Übrigens: Drückt man während des La¬ 
dens die vier Buchstaben RUBI, so be¬ 
schleunigt dies die Laderoutine we¬ 
sentlich, da der Hintergrundsound ab- 
geschaltet ist. 

Weil diese Demo ganze zwei Disket¬ 
tenseiten in Anspruch nimmt, kommt 
es natürlich ab und zu auch mal vor, daß 
die Diskette umgedrehl werden muß. 
Um Ihnen dies anzuzeigen, wurden ex¬ 
tra noch zwei TURN-DISC-Parts ge¬ 
schrieben. 

"Damit ich Kontakte zu 
anderen Demoprogram¬ 
mierern finde, also zur 
Szene.” 

Die einzelnen Parts in “Der Demo” 
wurden von den verschiedenen Logon- 
Crew-Members geschrieben. So gibt es 
einen 3D-SCR0LL-PART. in welchem 
sich ein 3D-Scroll präsentiert. Insge¬ 
samt sind zwei Parts vorhanden, die 
nicht auf jedem CPC laufen. Dies liegt 
an den verschiedenen CRTC (Video¬ 
controllern) bei den einzelnen Model¬ 
len. 

Alle Parts zu beschreiben würde sicher¬ 
lich den Umfang dieses Artikels über¬ 
schreiten. von daher können wir nur 
den Rat geben: Schauen Sie sich diese 
Demo einmal selber an. 

Mike Behrendt/rs 


Bewertung: 

Grafik: 90% Ideen: 93% 

Programmierung: 94% Sound: 96% 
Gesamteindruck: 97% 
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SAM satt: Für den SAM gibt ex inzwischen alles, was das Her: begehrt. 


Mit 8 Bit, Charme und 
Melone 

SAM, der echte Engländer 

In dieser Ausgabe wollen wir Ihnen erstmals 8-Bit-Coinputer vorstellen, die 
eigentlich gar nichts mit den Geräten AMSTRADCPC und PCW zu tun ha¬ 
ben. Anfängen wollen wir gleich mit einem Exoten. Dem SAM von MilesGor- 
don Technology. 


Wer bei dem Namen SAM an amerika¬ 
nische Geheimorganisationen denkt, 
der liegt gar nicht so verkehrt. Der 
“Große Bruder” SAM nimmt wirklich 
diese Stellung ein. Besitzt er doch ne¬ 
ben seinen drei Bildschirmmodi mit 
unterschiedlichen Auflösungen noch 
einen vierten, der voll ZX-Spectrum- 
kompatibel ist. 

Wie sich bei längerem Arbeiten mit 
dem SAM herausstellt, wurde auf diese 
Kompatibilität viel Wert gelegt. Aus 
Copyright-Gründen konnten jedoch 
nicht die Original-ROM-Routinen des 
Speccis benutzt werden. 

So kommt es vor, daß nicht jede Soft¬ 
ware auf dem SAM emuliert werden 
kann. Mittels Samtape, einer Software 
für den SAM, und eines Original-Spec- 
trum-Computers ist dies jedoch kein 
Problem mehr. So speichert man ein¬ 
fach das RAM des Spectrum auf eine 
Kassette, um es dann auf den SAM zu 


überspielen. Fertig, die Spectrum-Sofl- 
ware läuft nun komplett. 

SAM in aller Kürze 

Bei dem SAM-Computer handelt es 
sich um ein futuristisch gestaltetes 
Gerät, das mit einem Z8()-B-Chip. der 
mit 6 MHz getaktet ist, ausgestattet 
wurde. 

Dementsprechend schnell ist er auch 
im Vergleich zum CPC, der nur mit 4 
MHz läuft. 

Als ASIC ist ein VLSI VGT-200 Gate 
Array eingebaut. Seine Aufgaben lie¬ 
gen im Management des Speichers so¬ 
wie in der Grafikverwaltung. Ebenfalls 
kümmert er sich um die IO-Verwal- 
tung. 

Die Grafik wird von dem Motorola- 
MC-1377P-Videochip verwaltet. 

Für den äußerst guten Sound des SAM 
ist der Philips SAA-1099-Soundchip 


zuständig. Er bietet einen Sechskanal¬ 
sound mit einem Tonvolumen von voll¬ 
en acht Oktaven. 

Wahlweise kann der SAM an einen 
Fernseher mit normalem Antennenein¬ 
gang oder aber über ein Scart-Kabel an 
einen Computer-Monitor (RGB) ange¬ 
schlossen werden. 

Ebenso wie der CPC kann der SAM mit 
einem Kassetten- oder mit bis zu zwei 
3,5"-Diskettenlaufwerken arbeiten. Ei¬ 
ne Diskette hat hierbei eine Kapazität 
von 780 k Byte. 

Ansonsten bietet der SAM an seiner 
Rückseite noch folgende Anschlüsse 
und Tasten: 

• einen Reset-Taster, dem per Soft¬ 
ware jedoch noch andere Funktionen 
zugewiesen werden können, 

• zwei Midi-Anschliisse. die auch zur 
Kommunikation zwischen zwei Rech¬ 
nern eingesetzt werden können, 

• einen Joystick- sowie einen Maus¬ 
anschluß, 

• ähnlich wie beim CPC einen Expan¬ 
sion-Port. 

• Anschluß für Kassettenrecorder so¬ 
wie füreinen Lightpen. 

• einen An-/Aus-Schalter, 

• einen Scart-Anschluß sowie 

• einen Steckverbinder für das Netz¬ 
teil. 

Der SAM an sich hat von Haus aus eine 
Speicherkapazität von 256 kByte. In¬ 
tern läßt er sich jedoch auf 5 12 kByte 
und extern sogar auf 1 MByte aufrü¬ 
sten. Ebenfalls ist der SAM mit einem 
3,5”-Laufwerk ausgerüstet, daseinfach 
von vorne in den Rechner eingesteckt 
wird. Ebenso wird auch mit einem 
eventuell nachträglich einzubauenden 
Z we itla u fw e rk verf a h ren. 

Bei der Floppy handelt es sich um ein 
Citizen 3,5”-Slimline-Laufwerk. 

Diskettenverwaltung 

Das Diskettenformat kann mit dem 
CPC und entsprechenden Hilfsmitteln 
wie zum Beispiel Dicology analysiert 
werden. Die beidseitig benutzten Dis¬ 
ketten werden mit 80 Spuren pro Seite 
formatiert. Jede Spur enthält zehn Sek¬ 
toren, die eine Größe von 512 Byte ha¬ 
ben. Pro Sektor können jedoch nur 510 


Die Soft- und Hardware rund um den 
SAM wurde uns freundlicherweise von 
der Firma Erich Reitemann, Füllenbach- 
straßc I 1.4000 Düsseldorf 30, zur Ver¬ 
fügung gestellt. 
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Enid Blytons "Fünf Freunde" bestreiten auch 
auf dem SAM so manches Abenteuer. 



Wer Prince of Persia auf dem CPC kennt, wird 
von der SAM-Version noch mehr begeistert sein. 



langen. Wir ziehen die CPC-Version vor. 


Byte genutzt werden, da die letzten 2 
Byte vom DOS als Zeiger auf den näch¬ 
sten Datensektor genutzt werden. Die 
ersten vier Tracks enthalten das Inhalts¬ 
verzeichnis der Diskette. 

Das SAM-BASIC ist äußerst komforta¬ 
bel und leistungsfähig. So ist die Länge 
eines Programms nur von dem vorhan¬ 
denen Speicher abhängig. 
Zeilennummern können von 1 bis 
61439 reichen, wobei jede Zeile mit bis 
zu 127 Statements belegt werden kann. 
Strings können bis zu 64 kByte lang 
sein, und Arrays nutzen den gesamten 
Speicher aus. 

Neben den Standard-BASIC-Befehlen 
findet man noch Befehle für Funktio¬ 
nen und Prozeduren, wie sie eigentlich 
nur von anderen Hochsprachen wie 
zum Beispiel Pascal benutzt werden. 
Trotzdem ist das BASIC voll zeilenori¬ 
entiert. Auch die Befehle PEEK und 
POKEsind im BASIC enthalten. 
Interessant sind auch die vier verschie¬ 
denen Bildschirmmodi. 

Mode 1 arbeitet mit einer Auflösung 
von 256x192 Pixeln, wobei 16 aus 128 
Farben gleichzeitig benutzt werden 
können. Auf dem Bildschirm können 


32 Zeichen vertikal und 24 Zeichen ho¬ 
rizontal (im weiteren mit Cells be¬ 
nannt) dargestellt werden. 

Hierin unterscheidet sich der Bild¬ 
schirmmodus 2. Es können 32x192 
Cells dargestellt werden. 

Der dritte Modus arbeitet mit einer 
Auflösung von 512x192 Pixeln, wobei 
hier nur vier der 128 Farben dargestellt 
werden können. Modus 4 liefert wie¬ 
derum, bei einer Auflösung von 
256x 192 Pixeln, 16 aus 128 Farben. 
Wem die umfangreichen Funktionen 
des SAM-BASIC noch nicht genügen, 
der kann zusätzlich noch eine Software 
mit dem Namen MASTER-BASIC er¬ 
werben. Hier werden einige Original- 
SAM-Routinen in der Geschwindig¬ 
keit optimiert sowie einige neue hinzu¬ 
gefügt. 

Software für den SAM 

Auch wenn der SAM in deutschen Lan¬ 
den noch recht unbekannt ist, gibt es 
aus England mehr als genug Software 
für dieses Gerät. Hier nur allein die 
Soft- und Hardware, die uns zum Te¬ 
sten vorlag: 


Spiele 

Klax (bei CPC besser) 

Mindgames2 
Multi Pack 1 

Prince of Persia (besser als auf CPC) 
TheFamousFive 1 (Fünf Freunde...) 
Anwendungen 
Comet Assembler 

MasterBASIC- BAS IC-Erweilerung 
MasterDOS-SAM-DOS-Erweiterung 
Primary Maths One-Lernsoftware 
SAMTape - Spectrum-Software-Emu- 
lator 

Hardware 

Maus Interface 
RS232-Schnittstelle 

Daß der SAM sich in England weit ver¬ 
breitet hat, beweist allein schon die Tat¬ 
sache, daß es eine Diskettenzeitschrift 
sowie einige User-Clubs für den SAM 
gibt. Ja, selbst Demos wurden schon 
auf ihm programmiert. 

RalfSchößler 


Das Keyboard (siehe Abbildung) wurde 
vom Musikhaus Holzapfel, Stad 23, 
3440 Esch wege, entliehen. 



Genau wie beim CPC-plus ist auch das Innenleben des SAM sehr über¬ 
sichtlich. 



Mit zwei Strippen, einem Keyboard und dem SAM MIDI Sec/uencer läßt 
sich so mancher heiße Sound bewerkstelligen. 
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Biete Software 


PD-Software-,65bis2- 
Für IBM/Kompat. Kat.-Disk, gratis. 

M. Karbach, RemscheiderStr. 28, 

5650 Soli ngenl G 


Prolotto V91 (IBM PC/XT/AT). starkes 
Lottoprogramm zum erm. ausw. von 
VEW, Voll, Normallotto, versch. Analy¬ 
seoperationen. 3,5.5,25. DM 129,-inkl. 
MWSt.+ Versand. Best(Nachnahme): 
06144/42765 G 


Für JOYCE: Korrigierprogr Pro Spell, 
dBase II, fürdBase: Genealogie und 
LIT -Verwaltung, fürBASIC: Notizblock 
und Datenverwaltung, 2 Flugsimulat., 
Handbücher. Wordstar 3. Turbo Pas¬ 
cal, Joyceführer von DATA BECKER, 
Tel.: 04735/480 


SUPER-LYNX Versand Oestereich - - 
Jetzt endlich mitCPC-Software, Kata¬ 
log kostenlos, 0209/207222. Titel a. 
Disk: James Pond Coli. 64,90 DM. 

Kass. 39.90 bzw. 49,90 DM, Tel. 
0209/207222 ab 18 Uhr G 


cpc&joycePublic-Domain-Disks 

Info gegen 2,-DM in Briefmarken 
anfordermPDI, Postfach 1118, 

D-6464 Linsengericht 

8000 PD & Shareware auf Lager 

ab DM 0,65! G 


KATALOGDISKETTE 5,25" KOSTEN¬ 
LOS, SONDERANGEBOT-DER PC- 
KAUFMANN für nur DM 685,— 

EDV COMPUTER-PD EXPRESS 
Willi Stern, Kennedystr. 38, 

8039 Puchheim. 

Tel. 089-8002545 

FAX:089-808912 G 


Biete Hardware 


6128 + Dobb.X-LW+XDDOS + 
Speichererw. + Software-)- Lit.. auch 
einzeln, VB 499.-, Tel. 02196/92580 


CPC464Grünmon..Farb-Modulator, 
Vortex-Doppelfloppy. CP/M, Joyst., 
Para3.0, Literatur,950,00 DM 
P. Helfgen, 06842/6834 


BTX-Modul für CPC 6128 neuw. 
Tel. 07332/6956 


CPC464 + GT, 654 DDI4 Literatur 4 
Software DM 300,-, Tel. 06201/23029 

CPC 464 Grünmonitor mit Speicher¬ 
erweiterung 64 kB DM 210,-. 
Schenke,W-6921 Epfenbach, 

Tel. 07263-5597 


CPC 6128 m. Farbmonitor u. Spiele, 
Tel. 07426/2858 ab 18.00 Uhr 


CPC 464, Farbmonitor: DDI -1 Disket¬ 
tenlaufwerk, NLQ401 Drucker. 

2 Joysticks, Disketten, Handbücher. 
VB780.-DM, 

Tel: 08621/61920 


Suche Software 


Suche die CPC-Hefte 3-12/1985. 
Hefte 4-12/86 u. Heft 12/88 
P.Czapka, 

6000 Frankfurt/Main. 

Postfach 500749 


Suche CPC-Sonderhefte 1.2 u. 4 
Tel. 07022/51680, 

G. Derscheid 


Suche Lottozahlenvergleichspro¬ 
gramm, meine Zahlen sind gespeichert, 
aktuelle werden eingegeben, 
für PC bevorzugt, aber auch 6128. Pe¬ 
ter Schorr, Zur Schwedenschanz 1. 
8800 Ansbach 


Suche Hardware 


M P-1 /M P-2 auch def. 07128/710 


JOYCE-SCHNITTSTELLE, RS 232, 
kostengünstig gesucht,Telefon 
030-344 47 77 


Verschiedenes 


DISKETTE: 3", 10 Stck. DM63,- 
FARBB.: DMP9.-/JOYCE 12.- dto. rot. 
blau 0. grün DM 14.-/NLQ401 9.-/ 
ETIKETTEN 89x36 mm, 400 Stck. DM 
7,50, INFO ANFORDERN! 

W. KUHN, EDV-Zubehör. Hessenstr. 7, 
6340Dillenburg2, Tel./Fax:0 27 
71/32688, BTX:'KUHN# G 


Suche Schneider-BTX-Modul und an¬ 
deres Zubehör für die BTX-Anwendung. 
D. Seidel. PST 03-08,0-6101 Einhausen 


Club 


DerCPC-Userclub ist da! Überregional 
undunabhängig! Für alle CPC-Rechner 
bieten wir z.B.mtl. eine Clubzeitschrift, 
unverb. Info über alle Leistungen gegen 
0,60 Porto von R. Knorre, Post¬ 
fach 20 01 02,5600 Wuppertal, 
Stichwort CPC 


Die P.D.U.G. hat den Softwarepool für 
die CPC- und PCW-Serie um ca. 30 MB 
an PD-Programmen erweitern können. 
Jeder kann ein kostenloses Info gegen 
1,60 DM Rückporto bei uns anfordern. 
Die Aktivitäten gehen von einer Tausch¬ 
börse bis zu Sammelbestellung für 
Festplatten u.v.a. mehr. 

P.D.V.G.. Postfach. 6464 Altenhaßlau 


’CPC-POWER INTERNATIONAL 9/91’ 
Anwenderorientierte, 30 Seiten starke 
Fanzine für alle CPCs! In Heft 9: CPC 
Al-Personaliy, Marktübersicht, Turrican 
II-Test, lnfosu.v.m.nur6,-DM! 

Scheck oder bar an CPC-POWER. 
Postfach 501132,5000 Köln 50 


•■■•/Bra;smen 


Recht fürm 

die Armen ? \ 


ln ,1, i! Slnnis .l. i Millioii. imn.l' 
Hvlnn lic.lfMU'l Itrol .null ,ii,- 
1111.1 «il'.llllltü.lu- si II 
kimji .In ArntMrii Di.-vui: Ort 
/n (>r IWIu ii M.i'liu'l'i'i: «i‘r 
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KnnMmi.ir,-nii«ii|iM'li:ili, i 

INi-ir li> I! 12 Tniiii Multi*.111 in 

Brot 

für die Welt 

-ostoro <:: 11 500500-500 


Händlerverzeichnis 


Berlin [ Köln 



Einträge möglich minde¬ 
stens 6 x innerhalb eines 
Insertionsjahres. 


WEM ~ /Ä* /«/* di* 6P6f 

Hardware, Software, Reparaturen 
PD & DemoADiscmog -Kopierservice 
PF 501132,5 Köln 50, 02236-471 08 


Eintragungen im Händler¬ 
verzeichnis, nach Städten 
geordnet, kosten je mm 
Höhe 6,- DM bei einer 
Spaltenbreite von 58 mm. 


Löhne/Ostwestfalen 



Ctnmil« S Eaia-j-issufjn la KerilceiiscMäid; 

AWSIRA0 SCHI.-ICFF S VORTfX P/gcnilVr.l.t f. SERVICE- 
CEN1MIE. Sinll i.V.ufii(i, l ul: •. Fr*l,u:- 4 /juiilid 
«*-Z Elf ’äpci de • 3scs 
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i HEC • E PSOM - 1A --IDO» J • 3R^I - ICO - SflKC« • OKI * SlAft • 101771 - e(. 
amBalinol-Bndri SlraRn M-W?LC-HNE C5732S*»32« 


Nähere Informationen: 
DMV-Verlag 
Sylvia Stephani 
Telefon (056 51) 8 09-3 80 
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Zwei Themen - ein Ereignis 


Hobby-tranic & computerschau 


15. Ausstellung für Funk- 
und Hobby-Elektronik 

Die umfassende Marktübersichl für Hobby-Elektroniker 
und für Computeranwender in Hobby, 
Beruf und Ausbildung. 
Acfions-Center mit Experimenten, Demonstrationen 

und vielen Tips. 

Sonderschauen: „Straße der Computer-Clubs", 
„Historische Meßgeräte", „Design-Radios (Unikate)". 




8. Ausstellung für Computer, 

Software und Zubehör 

25.-29. März '92 

täglich 9-1 8 Uhr _ — 


/Messezentrum Westfalen hallen Dortmund 


Westfalen hallen 
Dortmund 
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Noch mehr LocoScript 

Briefköpfe in allen Größen 

Wer mit einer LocoScript-Version ab 2.12 arbeitet, findet im Lieferumfang 
gleichzeitig auch das Programm LocoChar. Hiermit lassen sich nicht nur eige¬ 
ne Zeichen für den Hausgebrauch definieren. 


Einer der großen Nachteile von Lo¬ 
coScript besteht darin, daß man -wie 
bei einigen anderen Textverarbeitun- 
gen auf anderen Systemen - keine 
Möglichkeit hat. Überschriften in be¬ 
liebiger Größe aufs Papier zu bringen. 
Das Beste, was sich aus LocoScript hcr- 
ausholen läßt, sind Großbuchstaben in 
doppelter Buchstabenbreite. Firmenlo¬ 
gos müssen also im Normalfall mit ei¬ 
nem anderen Programm hergestellt 
werden. Dies allein schreckt schon vie¬ 
le Leser davon ab. etwa einen Ge¬ 
schäftsbrief komplett mit LocoScript 
zu erstellen. Vielmehr wird weitgehend 
mit vorgedruckten Bögen gearbeitet. 
Nun gehört aber zu LocoScript ein Pro¬ 
gramm mit dem Namen LocoChar. Mit 
dessen Hilfe läßt sich dem eben ge¬ 
nannten Umstand leicht abhelfen. Daß 
dies mit etwas Arbeit verbunden ist, 
muß jedem klar sein. Hat man aber erst 
einmal einen Briefkopf entworfen, läßt 
sich dieser immer wieder verwenden. 

Was nicht ist, kann noch 
werden 

Da dieser Artikel keine Einführung in 
das LocoChar-Programm darstellen 
soll, sollten Sie spätestens jetzt damit 
anfangen, die Locomotive-Zusatzbro- 
schüre mit der Programmanleitung zu 
LocoChar zu studieren. 

Ist dies geschehen, haben Sie sicherlich 
gemerkt, daß Sie mit LocoChar unge¬ 
ahnte Möglichkeiten haben. Mit 16 frei 
definierbaren Zeichen sind Sie in der 
Lage, ein vergrößertes Alphabet mit 
Groß- und Kleinbuchstaben, darüber- 
hinaus noch Zahlen und andere Sonder¬ 
zeichen herzustellen. 

Dies ermöglicht Ihnen zwar immer 
noch nicht, besonders professionell 
aussehende Geschäftsbriefköpfe oder 
persönliches Briefpapier “wie aus dem 
Satzstudio” auszudrucken. Wie wir Ih¬ 
nen an einer der zwei Versionen zeigen, 
werden Sie jedoch in der Lage sein, Ihre 
eigenen Logos, Designs, Poster oder 
Notizen jeglicher Art zu gestalten. Die 
Auswahl und Form sind dabei nur 


durch Ihre Findigkeit und Fertigkeiten 
begrenzt. 

Der Autor benutzt für Stil eins einfache 
Blöcke und Dreiecke sowie weitere 
Formen, um Buchstaben und andere 
Symbole herzustellen. Die Schlüssel- 
nummern können Sie in der Abbildung 
“Erste Schritte” entnehmen. 

Großbuchstaben, 
die erste... 

Das erste Zeichen Oe ist das am häufig¬ 
sten benutzte Zeichen und die Stütze 
des ganzen Systems. 1e-4c werden zur 
Gestaltung der Ecken und Rundungen 
in den Buchstaben O, S, D, P, R und so 
weiter benötigt, sa und #su haben eine 
begrenzte Anwendung und werden für 
B, 8, X, K benutzt, während 5e bis 8e. 
2a, 2so, 6a und 6sa besondere Schritte 
in der Herstellung der Schrägseiten in 
A, V und W darstellen. 9e wird zur Er¬ 
stellung des “harten Leerzeichens” 
benötigt. 

Bei der Ausarbeitung dieser Formen in 
LocoChar müssen Sie die diagonalen 
und schrägen Formen mit Vorsicht be¬ 
handeln, da sich die Matrix nicht ganz 
so leicht diagonal teilen läßt. Sie wer¬ 
den also die Diagonale jede dritte oder 
vierte Zeile abstufen müssen. Mit etwas 
Geduld und Sorgfalt werden Sie aber 
bald die nötigen Techniken in den Griff 
bekommen. 

Briefköpfe und ähnliches 

Haben Sie nun alle Formen ausgearbei¬ 
tet und auf einer Matrix-Datei mit ei¬ 
nem neuen Namen in Ihrem System ge¬ 
speichert. können Sie den Zeichensatz 


installieren und sich an die Ausarbei¬ 
tung Ihres ganz privaten Logos ma¬ 
chen. Wollen Sie einen Briefkopf an¬ 
fertigen, müssen Sie mit dem Eröffnen 
eines Dokuments anfangen, indem Sie 
die Designs und Buchstaben hersteilen. 
Die besten Effekte werden Sie immer 
erhalten, wenn Sie “Subscript” mit ei¬ 
nem Zeilenabstand von 1/2 und mit 
acht Zeilen arbeiten. 

Die gewählte Buch staben breite (Zei¬ 
chen pro Zoll) ist abhängig von der 
Länge des Textes. Sowohl ZZIO als 
auch ZZ12 liefern gute Ergebnisse. Um 
den Titel auffallend zu gestalten, versu¬ 
chen Sie die Fettdruck-Auswahl: ZZ15 
und ZZ17 geben eine eher eckige Ge¬ 
stalt, da diese Zeichenanzahl für Roh¬ 
versionen benutzt wird. Trotzdem kön¬ 
nen sie in manchen Situationen recht 
reizvoll sein. 

Haben Sie einmal Ihr Design vervoll¬ 
ständigt. müssen Sie es speichern. 
Anschließend läßt es sich in jegliches 
Dokument einfügen. Vergessen Sie je¬ 
doch nicht, daß bei ZZ15 oder ZZ17 das 
Muster über die Randbegrenzungen Ih¬ 
res Dokuments gehen kann, was aber 
ganz normal ist. Versuchen Sie nicht, 
bei der Wahl der Zeichen pro Zoll PS 
einzugeben, da dies nie funktionieren 
wird. 

Beim nächsten Mal wird 
alles anders 

Nachdem Sie nun Ihren ersten Versuch 
hinter sich gebracht haben, werden Sie 
fcslstellen, daß hier und da noch so 
manches verbessert werden könnte. 
Diese Verbesserungen sollten Sie noch 
durchführen, um sich dann einem ganz 
anderen Stil widmen zu können. 

Dieser neue Stil arbeitet mit allen sech¬ 
zehn definierbaren Zeichen und muß in 
einem gesonderten Zeichensatz unter- 
gebracht werden. Er ist angebracht, um 
Beschriftungen, Namen oder Titel in 
rechteckige Boxen zu setzen. Der Stil 
mag nicht jedem von Ihnen Zusagen, da 
mancher ihn für etwas zu modern hält, 
wir möchten ihn aber dennoch vorstel¬ 
len. 


Oe 

1 e 

2 e 

3e 

4e 

5 e 

6e 

7 e 

8 e 

9e 2a 

2 sa 

6a 

6 sa 

5sa 

#sa 

■ 

A 

k 

1 

r 

i 

» 

i 

k 

r 

w 


I 
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Erste Schritte: "c" steht für die EXTRA-Taste , “a" für ALT und “sa" für Sill FT+ALT 


1e 2e 3e 4e 5e 

6e 

7e 8e 9e 

Oe 

2a 2sa 6a 6sa Osa 

tts a 

r i 1 J f 

* 

T A - 

1 

+ - - < 

> 


Beim zweiten Sri I werden alle sechzehn frei definierhuren Zeichen verwendet 
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Dieser Slil formt Buchstaben so, wie 
Sie es in der dritten Abbildung sehen. 
Hiermit kann man ebenso Zeichen in 
last allen Größen gestalten. Das Haupt¬ 
merkmal ist das Fehlen von diagonalen 
Linien, so daß alles eine Art “Deco- 
Look” annimmt. Die am häufigsten be¬ 
nutzten Zeichen sind in Kombination 
mit der EXTRA-Taste zu finden, 
während die Symbole unter 6a und 6 sa 
die kurzen Horizontalen sind, die nur für 
wenige Buchstaben in Frage kommen. 
6a gestaltet auch den Punkt, 4c das 
Komma und 2sa wird schließlich für Q, 
X und 4 benutzt. Das "Hart-Leerzei¬ 
chen" ist in diesem Zeichensatz unter 
2a zu finden. Die Formen unterer und 
#sa sind für#, K,X,3 und# reserviert, 
ln der Ausarbeitung dieses Zcichensat- 
zes kann die Stärke unter verschiede¬ 
nen Umständen variiert werden. Etwas 


Experimentieren wird Sie bei Ihrer Ent¬ 
scheidung unterstützen: Wenn Sie eini¬ 
ge Möglichkeiten ausprobiert haben, 
wissen Sie, was Sie bevorzugen. 

D ie größte Ei n sc h rän ku ng be s te h t da rin, 
daß die Symbole - außer dem Komma - 
sowohl horizontal als auch vertikal zen¬ 
triert werden müssen, so daß sie voll¬ 
ständigmiteinanderverbunden sind. 

Wie der zuvor genannte, arbeitet auch 
dieser Zeichensatz am besten in “Sub- 
script" mit einem Zeilenabstand von 
1/2 und ZZ8. Gute Ergebnisse erhalten 
Sie auch unter ZZ10 und ZZI2 mit der 
Fettdruck-Option. Aber auch ZZI 5 und 
ZZI 7 sind akzeptabel. Aus technischen 
Gründen erscheinen Überschriften, in 
denen jede Zeile mit einem “Hart-Leer¬ 
zeichen" begonnen und beendet wurde, 
regelmäßiger. 

G.F.A. Day/rs 


KSTORIC EHOPEdl fflLWflVS II! 


HBCDEF6HI JKLMTiOPQRSTUVWXY2 - 1234S6789 

flBCDEF6HIJKLnN0PQR5TUVWKiYe -183456789 
flBCDEFGHI JKLMNOPQRSTUVUXVZ -123456789 

MDEF6HIIlllOF0£5IUMY?ig3<156?89l 


FXBCOEF'GHUKL.IVI 
IM OPQRST UVWX V" <=2 
7 L~ £ 2 , 3 -a. S- 7 - G; 7 »(a 3 TO 


HBCDEFGHIJKLM 

NOPORSTUUWXYZ 

1 H 3 ZISG 789 D 


HBCDEFGHIJKLM 

N0PQR5TUWBYZ 

1 E 3456789 D 


Slil 2 bietet von der gewöhnlichen Schrift bis zur Umrandung alles, was das Her: begehrt 



ABCDEFGHIJ 

ABCDEFGHIJKL 


ABCDEFGHIJKLMND 

Stil I macht sich in allen Größen gilt 



Public- 
Domain- 
Software 


für den 
Joyce/PCW 

Bewährte Programme aus unserem 
Klassiker-Sortiment zum freien 
Weitergeben! 


Die Public-Domain-Sammeldiskette enthält: 

• Taschenrechner In Mallard-Basic 

• Werkzeug zum Komprimieren von Basic 
Programmen 

• Digitaluhr mir Wecker 

• Disktree 2 — zeigl Ireieri Speicherplatz von 
Disketten an 

• Texteditor der Spitzenklasse 

• DIN A-4-quer-Hardcopyroutine für PCW- 
Matrixdrucker. nutzt das ganze Blatt aus 

• Formatierer für 188 kByte auf PCW CF2- 
Diskelten 

• Vergleicher für Basic-Programme 

• Drucker Spooler 

• BS DUMP —verändern SieZeichensatz 
Floppyparameter, lästaturbelegung und 
Systemnieldungen Ihres PCW 

• Kermit — das Standard Terminalprogramm 
(für Interface CPS 8256 und kompatible) 


PD-Disk 1: Bestell-Nr. 24000, DM 19,- 

(Unabhängig von de' Anzahl der bestellten Produkte 
berechnen wir bei jeder Sendung lür das Inland 4,- DM, 
für das Ausland 6.- DM Porto und Verpackung.) 

DMV-Verlag, Postfach 250, 3440 Eschwege 
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APL-Z 

Eine Profi-Programmiersprache für den Joyce! 

Machen Sie aus Ihrer Joyce eine APL-Maschine- erleben Sie selbst die Fas¬ 
zination einer Programmiersprache aus der Grollrechnerwelt. Und das Toll¬ 
ste: Das Gefühl der “grollen weiten Computerwelt” ist noch nicht einmal 
teuer! 


Die Entdeckung bahnte sich beim Stö¬ 
bern in einer gut sortierten Postkiste 
(“Mailbox”) mit Public Domain an, als 
ich auf eine Datei namens APL- 
Z.ARC stieß. Nach dem Auspacken 
des komprimierten Dateipaketes und 
dem Studium der ziemlich kurzen und 
die meisten Fragen olTenlassenden 
Dokumentation und ersten wenig er¬ 
mutigenden Testläufen des Programms 
auf JOYCE war mir klar: Es handelte 
sich nicht um irgendeinen Dialekt ir¬ 
gendeiner verbreiteten Programmier¬ 
sprache, sondern um ein völlig anderes 
überraschendes Konzept. Da ich kei¬ 
nerlei Verwandtschaft zu BASIC, 
PASCAL oder auch LOGO entdecken 
konnte, schien es mir schon aus "com¬ 
puterlinguistischen” Gründen loh¬ 
nend, APL einmal näher unter die Lu¬ 
pe zu nehmen. 

Nach einigen Stunden intensiven Lite¬ 
raturstudiums wußte ich dann etwas 
mehr über APL: Kenneth Iverson ent¬ 
wickelte in den sechziger Jahren bei 
IBM eine symbolische Sprache, um 
komplexe mathematische Formeln 
aufzuschreiben. Dabei dachte er 
zunächst gar nicht an eine Program¬ 
miersprache im heutigen Sinne - 
“APL” entstand erst anschließend aus 
dem von Iverson erfundenen Formalis¬ 
mus. 

Die Besonderheit der Programmier¬ 
sprache APL ist nun, daß sie nicht nur 
mit einzelnen Zahlen oder Symbolen 
umgehen kann, sondern die Verarbei¬ 
tung ganzer Felder von Daten (“Struk¬ 
turen” wie Vektoren und Matrizen mit 
beliebigen (!) Dimensionen) auf ein¬ 
mal ermöglicht. So sind in API.-Aus¬ 
drücke wie 3 4 5 6+ 10 12 14 16 er¬ 
laubt: diese “Vektoraddition” liefert 
als Ergebnis den Vektor 13 16 19 22. 
Mit Hilfe von 24 Spezialsymbolen 
können diese Strukturen auf die ver¬ 
schiedensten Arten manipuliert und 
verknüpft werden, wobei nicht nur 
“normale” Rechenoperationen, son¬ 
dern auch beliebige Auswahl- und Sor¬ 
tiermöglichkeiten, Minimum- und Ma¬ 
ximumbildung. Spiegelung und Inver¬ 


tierung, logische Operationen, mathe¬ 
matische Funktionen, Ver- und Ent¬ 
schlüsselung und anderes eingebaut 
sind. 

Dazu paßt die Tatsache, daß APL eine 
dialogorientierte Sprache ist. Somit 
werden Ergebnisse sofort am Bild¬ 
schirm erscheinen, und Prozeduren 
können ohne umständliches Compilie- 
ren schnell ausgetestet werden. 

In spannenden Dialogen ... 

Zum Schreiben von Funktionen ent¬ 
hält APL einen besonderen (das heißt 
allerdings auch: gewöhnungsbedürfti- 
gen) Editor, der mit dem Befehl “Auf- 
der-Spitze-stehendes-Dreieck Ftink- 
tionsname” aufgerufen wird; das Li- 
sting einer definierten Funktion erhält 
man darin mit der Tastenfolge “cckigc- 
Klammer-auf Quadrat eckige-Klam- 
mer-zu”. 

Der Aufruf einer Funktion erfolgt mit 
dem Funktionsnamen wobei die “nila- 
dischen” ohne Argument auskommen 
die “monadisehen" Funktionen nur ein 
Argument (rechts) haben, und die 
“dyadischen” zwei Argumente brau¬ 
chen: eins links und eins rechts. Dabei 
sind zum Teil sogar verschiedene Di¬ 
mensionen möglich : zum Beispiel er¬ 
gibt 5+123 den Vektor 6 7 8. 

Die Zeilen in einem APL-Programm 
können unglaublich kompliziert wer¬ 
den. weil man Zuweisungen, die nach¬ 
einander ausgeführt werden sollen, in 
eine Zeile schreiben darf, also mit 
Zw i seltene rgeb n i sse n we i t e riech ne n 
kann. Dabei gilt grundsätzlich: 
APL-Zeilen werden von rechts her 
abgearbeitet! 

Auf dieser Grundlage läßt sich nun 
herrlich mit eigenen Funktionen expe¬ 
rimentieren. 

Eine Arbeitssitzung in APL beginnt 
nun typischerweise in einem leeren 
“workspace”, der sich während der Ar¬ 
beit mit den benötigten Variablen und 
Funktionen füllen läßt. Für Diskelten- 
zugriffe stehen Systemkommandos zur 
Verfügung: für Inhaltsverzeichnis La¬ 


den und Speichern die Befehle )CLIB 
)CLOAD und )COPY (für Funktionen 
*.ACO) beziehungsweise )LIB 
)LOAD und )SAVE (für komplette Ar- 
beitsräume *.A\VS). 

... füllen sich die Arbeits¬ 
räume 

Da die wenigsten Rechner über eine 
spezielle APL-Tastatur und den dazu¬ 
gehörigen Bildschirmzeichensatz ver¬ 
fügen, verwendet das ursprüngliche 
Programm APL-Z zwei Tabellen, über 
die die Ein- und Ausgabe aller Zeichen 
umgeleitet wird. So erzeugt zum Bei¬ 
spiel die Taste für den großen Buchsta¬ 
ben G den APL-Code für Auf-der- 
Spitze-stehendes Dreieck. 

Wird dieser Code nun von APL ausge¬ 
geben, dann erscheint auf dem Bild¬ 
schirm ein großes G. Der Anwender 
vor dem Bildschirm sieht also über¬ 
haupt nichts von dem auf der Spitze 


Mit “Iota 12” erzeugt man auf einen 
Schlag den Vektor 12 3 45 67 8 9 10 11 
12. dieser läßt sich mit dem “links- 
Pfeil” dem Variablennamcn X zuord¬ 
nen: “X links-Pfeil Iota 12”; 

“(3 5 4) Rho Iota 60” ergibt eine dreidi¬ 
mensionale Matrix aus drei zweidimen¬ 
sionalen Matrizen zu je fünf Zeilen und 
vier Spalten, in denen die Zahlen von 1 
bis 60 stehen. Auf dem Bildschirm und 
beim Ausdruck werden die drei Unter¬ 
mal rizen nacheinander dargestellt, je¬ 
weils durch eine Lecrzcile getrennt; mit 
“Y links-Pfeil (3 5 4) Rho Iota 60” er¬ 
hält die Variable Y diese Matrix als 
Wert zugewiesen. 

Umgekehrt hat “Rho Y" als Wert den 
Strukturvektor von Y. also 3 5 4, wenn 
Y eine so definierte Matrix ist. 

+/ Iota 12 liefert sofort die Summe der 
Zahlen von I bis 12, das heißt, der Vek¬ 
tor 1 2 3.. 12 wird reduziert auf die 
Summe 78; 

Kreis 5 liefert den Wert von 5 mal PI: 

1 Kreis X bedeutet Sinus X 

2 Kreis X ist Cosinus X; 

A Kreis_mit_Stem B bedeutet Loga¬ 
rithmus von B zur Basis A; 

Stern 3 ergibt e hoch 3 (natürliche Ex¬ 
ponentialfunktion); 

2 Stern 3 ist 8 (nämlich 2 hoch 3); 

! 5 ist 5! (= 5 mal 4 mal 3 mal 2 mal 1 
= 120 ); 

2 ! 5 ist der Binomialkoeffizient 3 über 
5 (=10) 


Hier ein paar Kostproben der besonderen Sym¬ 
bole mit denen APL die Verarbeitung von mehr¬ 
dimensionalen Strukturen am zweidimensiona¬ 
len Bildschirm ermöglicht: 
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APL-Tastatur: normal 



APL-Tastatur: mit SHIFI 



APL-Tastatur: mit ALL 



APL-Tastatur: mit EXTRA 


stehenden Dreieck. Damit nun Joyce 
tatsächlich all die hübschen Symbole 
zeigt, sprich zu einer “richtigen" APL- 
Maschine wird, mußte eine Menge Ar¬ 
beit geleistet werden: 

Aber ob Joyce das kann? 

- Im Bildschirmzeichensatz wurden 
(teilweise mit dem “Charakter-Desi¬ 
gner” CD.COM) zunächst die Groß¬ 
buchstaben auf die Plätze der kleinen 
Buchstaben verschoben und an¬ 
schließend der dadurch freigewordene 
Platz der Großbuchstaben mit den spe¬ 
ziellen punktweise gezeichneten APL- 
Symbolen belegt. 

- Die Tastaturbelegung wurde so ver¬ 
ändert, daß die von APL benötigten 
Doppelcodes direkt erreichbar sind 
und Codes, die APL nicht akzeptiert, 
gar nicht erst erzeugt werden können. 

- Die beiden “Umleitungen" mit den 
aufwendigen Tabellenabfragen im 
Programm APL-Z wurden mit Hilfe 
von SID.COM entfernt. 

Der Drucker allerdings läßt sich nicht 
auf diese Weise überzeugen: die APL- 
Zeichen kann er nur mit EXTRA PTR 
richtig vom Bildschirm aufs Papier 
bringen - ein Nachteil, der jedoch 
kaum ins Gewicht fällt, da APL-Funk- 
tionen selten mehr als einen Joyce- 
Bildschirm füllen (sollten). 

... sogar gleich nach dem 
“Booten”! 

Soll nun Joyce vom Start weg auf diese 
Weise als APL-Maschine funktionie¬ 
ren. so kommt man um einen Patch von 
J14GCPM3.EMS nicht herum. Auf der 
DATA BOX finden Sie dafür einen 
Overlay APL.OVL und eine Submit- 
Datei APLINST.SUB, die den Patch 
automatisch vornimmt. Die DATA- 
BOX enthält auch das schon für 
JOYCE angepaßte Programm APL 
.COM sowie einen APL-Workspace 
HILFE.AWS, der mit dem APL-Be- 
fehl )LOAD HILFE aufgerufen wird 
und voll ist mit Informationen über die 
Systemkommandos, die Systemvaria¬ 
blen, die Bildschirm- und Drucker¬ 
steuerung, die Tastatur und das Arbei¬ 
ten mit dem Editor. 

Außerdem finden Sie auf der DATA- 
BOX auch viele fertige APL-Funktio- 
nen, die schon in dem ursprünglichen 
Public-Domain-Paket enthalten waren 
und zum Teil richtige Leckerbissen für 
Denksportler darstellen. 

Gisbert Friege/rs 


- 
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Plot komplett 

Torten- und Klimadiagramme mit 
GSX-Plot 

In der Ausgabe 2/3’91 haben wir bereits eine Erweiterung für die Joyce Pro¬ 
grammsammlung Vol.3 (GSXPLOT) vorgestellt. Jetzt wollen wir Ihnen zei¬ 
gen, wie Sie die Programmodule zur Torten-oder Klimadiagrammerstellung 
in das Hauptmodul “CiSXMENÜ” einbinden. 


In dieser Ausgabe wollen wir “Nägel 
mit Köpfen” machen. 

Auf der DATABOX zum vorliegenden 
Heft befinden sich insgesamt vier klei¬ 
nere Programmteile mit den Namen 
MENÜERW.BAS, HELPERW.BAS, 
KLIMAERW.BAS und TOR- 
TEERW.BAS, die mit dem Befehl 
“MERGE” in die ursprünglichen Da¬ 
teien eingebunden werden. Das Pro¬ 
gramm GSXDATE1.BAS wurde kom¬ 
plett neu geschrieben, da hier bis zu 2/3 
aller Zeilen geändert werden müssen, 
um ein auch hinsichtlich der Grafikzei¬ 
chen ansprechendes Ergebnis zu erhal¬ 
ten. Die Erweiterungen können wie 
folgt zugeordnet werden: 

Ursprungsprogramm -> Erweiterung: 
GSXMENÜ.B AS-> MENÜERW.BAS 
GSXHELP.BAS-> HELPERW.BAS 
GSXTORTE.BAS ->TORTEERW.B AS 
OSXKLIMA.BAS-> KLIMAERW.BAS 

Einbinden der Programme: 

Zunächst muß das Ursprungspro¬ 
gramm geladen werden. Nun können 
mit dem Befehl “MERGE “ die zusätz¬ 
lichen Zeilen in das jeweilige Pro¬ 
gramm eingebunden werden. An¬ 
schließend ist dann das Programm mit 
dem Befehl “SAVE” wieder auf der 
Diskette zu sichern. 

Fertig. 

ACHTUNG: Bei dem Programm 
“GSXTORTE.BAS” muß vor dem 
Einbinden der Erweiterung mittels 
des Befehls “RENUM” zunächst die 
Zeilennumerierung geändert wer¬ 
den. 

Nun zur Beschreibung der einzelnen 

Programmerweiterungen: 

MENÜERW.BAS: 

Die Zusatzprogramme GSXTORTE 
und GSXKLIMA werden in die grafi¬ 
sche Benutzeroberfläche integriert. 
Die ursprüngliche Version des Pro¬ 
gramms war derart programmiert, daß 
das Programm bei der Anwahl eines 


leeren Feldes mittels einer Meldung be¬ 
endet wurde. Diese doch sehr unglück¬ 
liche Lösung wird gleich mit beseitigt. 
Zukünftig werden diese Meldungen 
kurz auf dem Bildschirm eingeblendet 
und verschwinden wieder, so daß 
anschließend weitergearbeitet werden 
kann, ohne das Programm neu starten 
zu müssen. 

HELPERW.BAS: 

Die Zusatzprogramme GSXTORTE 
und GSXKLIMA werden in die HELP- 
Funktion mit einer kurzen Beschrei¬ 
bung integriert. Gleichzeitig werden 
die Dateinamenerweiterungen (.TOR; 
.KLI) aufgenommen, die durch diese 
zusätzlichen Programme erzeugt wer¬ 
den. 

TORTEERW.BAS und KLIMA¬ 
ERW.BAS: 

ln beide Programme wird die zusätzli¬ 
che Möglichkeit eingebunden, aus dem 
Hauptmenü heraus mittels der Taste 
<d> (wie bei den anderen Programmo¬ 
dulen auch) wieder das Programm 
GS X MENÜ .BAS zu starte n. 

GSXD ATEL BAS: 

Durch die Programme GSXTORTE.BAS 
und GSXKLIMA.BAS werden Datei¬ 
en mit den Endungen *.TOR bezie¬ 
hungsweise *.KLI angelegt. Diese zu¬ 
sätzlichen Dateiarten werden durch das 
neue Programm GSXDATEI.BAS in 
die tabellarische Übersicht des Inhalts¬ 
verzeichnisses aufgenommen. 

Für die Benutzer eines JOYCE-PLUS 
(PCW 8512) oder eines JOYCE (PCW 
8256) mit einer Speichererweiterung 
bietet es sich an, sofort beim Booten des 
Programms alle erforderlichen Dateien 
in das M-Laufwerk zu laden und von 
dort aus zu starten, um sich nicht stän¬ 
dig als Diskjokey betätigen zu müssen. 
Dies ist durchaus möglich, wie uns der 
erste Tip zu GSX-Plot zeigen wird. 

Da sämtliche benötigten Programme 
allerdings mehr als eine Diskettenseile 
belegen, muß mit einigen Tricks gear¬ 
beitet werden. Aber keine Angst, dies 
hört sich schlimmer an, als es letztend¬ 


lich ist. Die ganze Arbeit ist nur mit ei¬ 
nem kleinen Zeitaufwand verbunden. 
Zunächst einmal erstellen wir uns eine 
neue Startdiskette. Um alle Programme 
einigermaßen systematisch auf dieser 
Startdiskette unterzubringen, muß die¬ 
se Diskette auf beiden Seiten mit 43 
Spuren formatiert werden. Für regel¬ 
mäßige Leser der CPC beziehungswei¬ 
se für Bezieher der DATABOXEN 
dürfte dies kein Problem sein. Hier sei 
nur auf das Bonusprogramm der Data- 
box 6/7’90 (DISKFC5RM.COM) und 
auf den Artikel “MEHR GEHT NICHT 
- Mit D1SCKIT von 0 auf 43 Spuren in 
1 7.0 Sekunden" der CPC 10/11 ’90 ver¬ 
wiesen. 

Anschließend kopieren wir auf diese 
Diskette folgende Programme von un¬ 
serer ursprünglichen Startdiskette: 


vSeite A: 

.114GCPM3.EMS 

BASIC.COM 

ASSIGN.SYS 

GSX.SYS 

DDFXHR8.PRL 

DDFXLR8.PRL 

DDSCREEN.PRL 

PIP.COM 

SUBMIT.COM 


Seite B 

GSXDATEI.BAS 

GSXHBARS.BAS 

GSXHELP.BAS 

GSXKLIMA. BAS 

GSXKURV2.BAS 

GSXKURVE.BAS 

GSXMARKS.BAS 

GSXMENÜ.BAS 

GSXM1 IBAR.BAS 

GSXMVBAR.BAS 

GSXSTACK.BAS 

GSXSTV.BAS 

GSXTEXT.BAS 

GSXTORTE.BAS 

GSXVBARS.BAS 

PIP.COM 


Zusätzlich muß jetzt auf beide Disket¬ 
tenseiten das Programm INFO.COM 
von der DATABOX kopiert werden. 
Mit ihm wird es möglich, die Diskette 
während der Abarbeitung einer Sub- 
mit-Datei zu wenden. 

Wer jetzt noch möchte, kann auf Seite A 
der Diskette noch sämtliche Demoda¬ 
teien unterbringen. Platz hierfür ist 
noch vorhanden. 

Auf Seite A unserer neuen Startdiskette 
fehlt jetzt nur noch die neue Startdatei 
“PROFILE.SUB”. Diese kann mit je¬ 
dem beliebigen Editor, zum Beispiel 
RPED.BAS, erzeugt werden und sollte 
wie folgt aussehen: 

INFO.COM 

PIP 

<M:=A:*.BAS 

< 

1NF0.COM 

PIP 

<M:=A: BASIC.COM 


80 CPC 2/3'92 





PCW 


<M:=A: PIP.COM 
<M:=A:*.PRL 
<M:=A:*.SYS 
< 

M: 

BASIC GSXMENÜ 


Nachdem diese Arbeiten nun erledigt 
sind, geht es ans Eingemachte. Da 
sämtliche Programmmodule die Mög¬ 
lichkeit bieten, mittels der Taste <d> in 
das Hauptmenü, sprich GSXMENÜ 
zurückzukehren, müssen wir jetzt alle 
Programme dazu veranlassen, das Pro¬ 
gramm GSXMENÜ vom Laufwerk M 
zu laden. In jedem Programm ist eine 
Zeile enthalten, die mit folgendem 
Wortlaut endet: cCHAIN “GSX- 
MENÜ”>. In diesen Zeilen ist jetzt der 
Teil “cCHAIN “GSXMENÜ”> durch 
cCHAIN “M :GSXMENÜ”> zu erset¬ 
zen. Dazu muß zunächst das jeweilige 
Programm geladen werden. Mit dem 
Befehl ED1T muß nun die entsprechen¬ 
de Zeile zur Bearbeitung aufgerufen 
und anschließend, wie vorab erwähnt, 
geändert werden. Mit “SAVE “ ist das 
Programm anschließend wieder zu si¬ 
chern. 

Die zu ändernden Zeilennummern 
(nach Einbinden der Erweiterungen!!!) 
in den jeweiligen Programmen lauten 
wie folgt: 


Programm: 

GSXDATEI.BAS 
GSXTORTE.BAS 
GSXKLIMA.RAS 
GSXHBARS.BAS 
GSXHELP.BAS 
GSXKÜRV2.BAS 
GSXKURVE. 3AS 
GSXMARKS.BAS 
GSXMHBAR.BAS 
GSXMVBAR.BAS 
GSXSTACK.RAS 
GSXSTV.BAS 
GSXTEXT.BAS 
GSXVBARS.BAS 


Zeilennummer: 

600 
285 
285 
1660 
610 
1640 
1860 
1540 
1740 
1730 
14 90 
1690 
1550 
1800 


In dem Programm GSXMENÜ.BAS 
müssen jetzt noch die Zeilen, in wel¬ 
chen die einzelnen Programme gestar¬ 
tet werden (CHAIN ““) durch den Be¬ 
fehl (CHAIN “M:”) ersetzt werden. 
Dazu steht auf der DATABOX das Pro¬ 
gramm MPLIJSERW.BAS, welches 
anstelle der Datei MENÜERW.BAS in 
GSXMENÜ.BAS “eingemerget” wer¬ 
denkann. 

Zu aller Letzt muß jetzt noch die Datei 
ASS1GN.SYS entsprechend angepaßt 
werden. Dies kann mit einem beliebi¬ 


gen Editor, zum Beispiel RPED.BAS, 
erfolgen. ASSIGN.SYS muß folgen¬ 
den Wortlaut erhalten: (siehe auch 
nachfolgenden Absatz) 

Vorschlag 1: Vorschlag2: 

21m: DDFXHR8 21m: DDFXHR8 

22 m: DDFXLR8 Olm: DDSCREEN 

01 m:DDSCREEN 

Nach Durchführung dieser Änderun¬ 
gen steht einem zukünftigen bequeme¬ 
ren Arbeiten mit dem Programm nichts 
mehr im Wege. 

Druckertreiber 

Die Ausgabe der erzeugten Dateien auf 
dem Drucker erfolgte in dem Pro¬ 
grammpaket GSX-PLOT bisher 
grundsätzlich im Korrespondenzmo¬ 
dus. Wer hier keine Änderungen 
wünscht, sollte die ASSIGN.SYS-Da- 
tei gemäß des Vorschlags zwei ändern. 
Der Druckertreiber DDFXLR8.PRL 
dient dazu, Grafiken oder Text in der 
sogenannten Entwurfsqualität auszu¬ 
geben. Nähere Informationen zu den 
Druckertreibern und der Treiberdatei 
ASSIGN.SYS bitte im Handbuch (Ka¬ 
pitel 4) nachlesen. 



Auch für GSX-PLOT lassen sich in die 
jeweiligen Programme Wahlmöglich¬ 
keiten für einen Ausdruck in Entwurf¬ 
oder Korrespondenzqualität integrie¬ 
ren. Sofern dies gewünscht wird, sollte 
die ASS1GN.SYS-Datei nach Vor¬ 
schlag eins erstellt werden. Die erfor¬ 
derlichen Änderungen in den Program¬ 
men GSXKLIMA.BAS und GSXTOR- 
TE.BAS unterscheiden sich etwas von 
den übrigen Programmen. Aus diesem 
Grund werden die Änderungen in den 
Programmerweiterungen KLIMA- 
DR.BAS und TORTEDR.BAS extra 
ausgewiesen und können mittels 
“MERGE” in die jeweiligen Program¬ 
meeingebunden werden. 


Die Änderungen in den übrigen Pro¬ 
grammen sind im Grunde identisch. 

In jedem Programm ist eine Zeile mit 
dem Befehl “device = 2LGOSUB 
50800” enthalten. Diese Zeilen müssen 
wie folgt ergänzt und erweitert werden: 

<zeilennr> PRINT cls$;FN 
pkt$ (8,15, " (E) ntwurf oder 
(K) orrenpondenz ") ; : INPUT d$ 
<zeilennr>+l IF d$="e" THEN de 
vice^22 

<zeilennr>+2 IF d$="f" THEN de 
vice=2l ELSE <zeilennr> 
<zeilennr>+3 GOSUB 50080 

Als Beispiel ist hiereinmal kurz die Än¬ 
derung in dem Programm GSXV¬ 
BARS. BAS aufgelulirt: 

1760 PRINT cls$;FNpkt$ (8,1 5, " 

(E)ntwurf oder (K)orrenpondenz 
");:INPUT d$ 

1761 IF d$-"e" THEN device-22 

1762 IF d$="f" THEN device=21 EL¬ 
SE <ZEILENNR> 

1763 GOSUB 5008C 

Vorgehens weise: Laden Sie zunächst 
das jeweilige Programm: Mit dem Be¬ 
fehl “EDIT <ZF.ILENNR>“ rufen Sie 
die jeweilige Zeile zur Bearbeitung auf. 
Vergewissern Sie sich, daß der Text 
dort auch wirklich “device=21:GO¬ 
SUB 50080” lautet. Mit zweimaligem 
Druck auf die Taste <AUSBL> kann 
die aktuelle Zeile dann gelöscht wer¬ 
den. 

Anschließend die Erweiterung, wie 
vorne beschrieben, eingeben. 

Die Zeilennummern, ab denen mit der 
Erweiterung in den einzelnen Program¬ 
men begonnen werden muß, lauten w ie 
folgt: 

Programm: Zeilennummer: 

GSXHBARS.BAS 1620 

GSXKURV2.BAS 1600 

GSXKURVE.BAS 1820 

GSXMARKS.BAS 1500 

GSXMHBAR.BAS 1700 

GSXMVBAR.BAS 1690 

GSXSTACK. BAS 1450 

GSXSTV. BAS 1650 

GSXTEXT. BAS 1510 

GSXVBARS.BAS 1760 

Wir hoffen, mit diesen Tips den Freun¬ 
den der Programmsammlung VOL. 3 
einige nützliche Erweiterungen gelie¬ 
fert und ein bequemeres Arbeiten er¬ 
möglicht zu haben. 

R. Walter/rs 


* 
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Im Herzen des JOYCE 

Teil 5: Unter der Hand - die Tastatur 

Will der Anwender mit einem Programm kommunizieren, so zählt die Tasta¬ 
tur immer noch zu den am häufigsten benutzten Eingabegeräten. Auch w enn 
in gröberen Systemen die Maus oder das Grafik-Tablett immer mehr an Be¬ 
deutunggewinnen, läßt sich das tastenbesetzte Eingabemedium nicht so ein¬ 
fach ersetzen. Für den JOYCE wird sich daran auch in der Zukunft nicht viel 
ändern. Darum ist, w er seine Tastatur richtig einsetzen kann, den anderen im 
mer einige Schritte voraus. 


Die Umsetzung beziehungsweise Über¬ 
setzung der Tastatureingaben wird für 
gewöhnlich durch das BIOS erledigt, 
so daß sich ein Programm nicht darum 
zu kümmern braucht. Trotzdem ist es 
manchmal nützlich, wenn man weiß, 
wie bestimmte Funktionen ausgeführt 
werden, beziehungsweise wie man spe¬ 
zielle Anwendungen selbst program¬ 
mieren kann. Um Ihnen dabei zu hel¬ 
fen, werden wir uns in diesem Beitrag 
etwas näher mit dem Keyboard Mana¬ 
ger (KM) befassen, jenem Programm- 
Modul, das im BIOS die Zeicheneinga¬ 
be steuert und überwacht. Die Haupt¬ 
aufgaben des Keyboard Managers las¬ 
sen sich folgendermaßen definieren: 

- Bereitstellung und Unterstützung 
der Zeichenübergabe an das BIOS 
Die hierfür implementierten Routinen 
geben ein angefordertes Zeichen, so¬ 
fern vorhanden, über den Accumulator 
ans BIOS zurück. 

- Verwaltung und Bearbeitung der 
Expansions-Strings 


Expansions-Strings sind Zeichenketten, 
die jeweils einem bestimmten ASCII- 
Code von $80 - $9E zugeordnet sind. 
Wird nun bei der Übersetzung einer Ta¬ 
statureingabe ein solches Zeichen ge¬ 
funden, so wird der entsprechende 
String aktiviert, Zeichen für Zeichen 
ausgelesen und ans BIOS übergeben, 
so als würden die entsprechenden Ta¬ 
sten gedrückt. Diese Zeichenketten 
werden im sogenannten “Expansion 
String Buffer” (S2876 - $290C) aufbe¬ 
wahrt und können vom Anwenderpro¬ 
gramm ausgelesen oder auch geändert 
werden. Die vom BIOS vorgegebenen 
“Expansions" dienen hauptsächlich der 
Eingabe von Steuerzeichen, hier lassen 
sich allerdings auch Programmaufrufe, 
Kommandoeingaben und so weiter de¬ 
finieren und abspeichern. Sollte der 
Default-Puffer zu klein werden, so be¬ 
steht mit der Routine KM EXP BUF¬ 
FER INIT die Möglichkeit, einen “eige¬ 
nen”, beliebig großen Expansions-Puf- 
fereinzurichten. 


- Übersetzung und Speicherung der 
von der Tastatur empfangenen Zei¬ 
chen 

Bevor ein Zeichen ans BIOS übergeben 
wird, muß es. sofern es nicht aus einem 
Expansions-String stammt, entspre¬ 
chend der Tastennummer und der even¬ 
tuell gedrückten Sondertasten (<SH1FT/ 
AI T/EXTRA» in ein ASCII-Zeichen 
übersetzt werden. Diese Übersetzung 
geschieht mit I Ii 1 fe von Tabe 11 cn, i n de- 
nen die den Tasten zugeordneten AS- 
CH-Codes gespeichert sind. Für jede 
Sondertaste gibt es separate Überset¬ 
zungstabellen. 

Direkt zugreifen 

Nun aber zu den schon erwähnten Pro¬ 
gramm-Routinen. 

Da sind zunächst einmal die allgemei¬ 
nen Funktionen für die Zeicheneinga¬ 
be, die vom BIOS aufgerufen werden, 
wenn ein Zeichen von der Tastatur ge¬ 
lesen werden soll: 

KM WAITCHARSU42 
liest ein Zeichen von der Tastatur oder 
aus einem Expansions-String bezie¬ 
hungsweise wartet, bis ein solches Zei¬ 
chen vorliegt. 

KM FLUSH $1148 
leert den Tastaturpuffer und beendet die 
Bearbeitung eines gerade aktiven Ex¬ 
pansions-Codes. 

KM READ CHAR $114E 
liest ein Zeichen aus dem Tastaturpuf¬ 
fer, von der Tastatur oder aus einem Ex¬ 
pansions-String, sofern ein Zeichen 
vorhanden ist. 

KM GET STATUS $115C 
prüft, obein Zeichen (Tastatur oder Ex¬ 
pansions-String) vorhanden ist. 

Für das direkte Auslesen von Tastatur¬ 
puffer und Expansions-String können 
folgende Funktionen aufgerufen wer¬ 
den: 

KM READ KEY $I19C 

holt ein Zeichen aus dem Tastaturpuffer 
beziehungsweise von der Tastatur. Ist 
ein gültiges Zeichen vorhanden, wird 
es übersetzt und übergeben. 

KM GET EX FAN I) $ 1270 
liest ein Zeichen aus einem Expan¬ 
sions-String. Der Expansions-String- 
Zähler bestimmt die Position des Zei¬ 
chens innerhalb des Strings. 

Die folgende Routine eignet sich so¬ 
wohl für die Einrichtung eines neuen 
Expansions-Puffers als auch zur Ini¬ 
tial i s i e ru ng des Defau 11 - Puffers: 

KM EXP BUFFER INIT$I1A6 
Für den Aufruf müssen Startadresse 
(Default=$2876) und Pufferlänge (De- 
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Exp 

-Code: 

Funktion: 


Taste: 


$80 


A C 


[STOP) 


$81 


A Z 


mi 


$82 

A Z 


[f2J ([SHIFTl+ff 

11) 

$83 


A Q 


LO] 


$84 


A Q 


[f4]([SHlFT]+[f31) 


$85 A S [15] 


$86 

A S 

[f6|(I SHIFT]-HB]) 

$87 

A P 

[f7j 

$88 

A P 

[f8J ([SHlFTj+[f7]) 

$89 

A G 

[DELj] 

S8A 

DEL 

11 DEL] 

S8B 

A H 

[CAN] 

S8C 

A U 

IAUSBL1 

$8D 

A W 

[EIN BL] 

$8E 

A l 

[SUCHE] 

$8F 

A F A B A B 

[EZ] 

$90 

A F A B 

[ZE1LEJ 

$91 

A 

l A l 

$92 

A V 

1+1 

$93 

A A 

[11 

$94 

A F 

[I] oder [ZCHN ] 

$95 

A R 

[FORM] 

$96 

AA 

[>1 

$97 

A K 

lALT|+[DELj] 

$98 

A Ö 

[-1 

$99 

A E 

[ALT]+[>] 

$9A 

A X 

[ALT]+[I DEL] 

$9B 

nicht belegt 


$9C 

nicht belegt 


$9D 

nicht belegt 


$9E 

nicht belegt 



Das Zeichen $9F wird als Füllzeichen benutzt und nicht beachtet. 


fault=$97) übergeben werden. Der 
Keyboard Manager richtet dann den 
Expansions-Puffer ein, setzt die 
benötigten Zeigervariablen und über¬ 
trägt die Default-Expansions in den 
neuen Puffer. Damit steht der Anlage 
eines eigenen “Makro”-Puffers nichts 
mehr im Wege. Bleibt noch anzu¬ 
merken, daß ein neuer Puffer in der 
sogenannten COMMON-Mcmory 
(SC000-$FFFF) liegen muß, damit er 
vom Keyboard Manager erreicht wer¬ 
den kann. 

Für den Eintrag neuer Expansions- 
Strings kann dann die Funktion 
KM SET EXPAND$1204 
aufgerufen werden, die eine über das 
HL-Register adressierte Zeichenkette 
in den Expansions-Puffer einträgt, so¬ 
fern genügend Platz vorhanden ist. Die¬ 
ser neue Expansions-String muß eben¬ 
falls über die COMMON-Memory 
übergeben werden, damit er für den 
Keyboard Manager verfügbar ist. 

An der Basis: Tasten- 
Codes 

Wer sich mit den normalen Eingabe- 
Routinen nicht zufriedengibt. dem ge¬ 
stattet der Key board Manager auch den 
Zugriff auf die Routinen zur Bearbei¬ 
tung der Tasten-Codes, von Fachleuten 
als “Key-Token” (KT) bezeichnet. Sol¬ 
che Tasten-Codes bestehen immer aus 
zwei Bytes, der Tastennummer und 
dem Tastenstatus, der den Zustand der 
Sondertasten <SHIFT>. <EXTRA> 
und <ALT> beschreibt. 

Die Erstellung dieser Tasten-Codes ist 
eine recht komplizierte Sache, darum 
sei sie hier nur “im groben” erläutert. 
Wird auf der Tastatur eine Taste betä¬ 
tigt, so übergibt der Keyboard-Control- 
ler diese Information in Form von Ko¬ 
ordinaten an das Gate-Array des JOY¬ 
CE. Das Gate-Array überträgt die Ko¬ 
ordinaten dann in den Speicher, in die 
sogenannte Key Response Table 
(KRT). Die KRT liegt, da sie von der 
“Hardware” angesprochen wird, im¬ 
mer an der gleichen Adresse ($BFF0- 
SBFFF) in der Speicherbank #0. 

Der Keyboard Manager überprüft nun 


Die "Default-Expansions" des JOYCE 

in regelmäßigen Abständen über eine 
Interrupt-Routine die KRT, ob eine Ta¬ 
ste gedrückt wurde, und errechnet dann 
aus den Einträgen der KRT die Key-To¬ 
ken. Die so ermittelten Tasten-Codes 
werden nun auf Sonderfunktionen ge¬ 
prüft, das bedeutet, es wird geprüft, ob 
ein Urladen (Cold Boot) durchgeführt, 
ob das Drucker-Menü aufgerufen oder 
eine Hardcopy gedruckt werden soll. 

Da der Aufruf der Interrupt-Routine 
automatisch vom System-Ticker er¬ 
folgt, sind Details an dieser Stelle nicht 
ganz so wichtig. 

Wichtig ist jedoch, daß am Ende dieser 
Routine die gültigen Tasten-Codes in 
den Tastaturpuffereingetragen werden 
und dann für den Anwender zur Verfü¬ 
gung stehen. Dieser Puffer kann insge- 
sammt 20 Key-Token aufnehmen und 
ist als Ringpuffer mit FIFO-Struktur 


organisiert. Entsprechende Schreib-/ 
Lesezeiger sorgen für eine ordnungs¬ 
gemäße Speicherung der Tasten-Co- 
des. 

Für die Aufrufe, bei denen die Key-To¬ 
ken benötigt werden, enthält das C- Re¬ 
gister die Tastennummer und das B-Re¬ 
gister den Tastenstatus in der folgenden 
Bit-Konfiguration: 

bitO: nichtdefiniert 
bit 1: EXTRA 

bit2: CAPS LOCK (= ALT+ENTER) 
bit 3: REPEAT 

bit 4: NUM LOCK(= ALT+FORM) 
bit 5: SHIFT 

bit6:SHIFT LOCK aktiv 
bit 7: ALT 

Zur Manipulation des Tastaturpuffers 
und der Tasten-Codes eignen sich be¬ 
sonders die Routinen: 

KM KT GET$133B 
liest ein Key-Token aus dem Tastatur¬ 
puffer. Falls notwendig, wird der 
CAPS-LOCK- beziehungsweise NUM- 
LOCK-Status geändert und auf den 
neuesten Stand gebracht. 

KM KT READ BUFFER $137F 
liest ein Key-Token aus dem Tastatur- 


Übersetzungstabelle für: 

Adresse: 


keine Sondertaste (‘NORMAL') 

$1780 


SHI FT-Taste oder <SH I FT LOCK> 

S17D1 


ALT-Taste 


S1822 


SHIFT-+ALT-Tastcn 


S1873 


EXTRA-Taste 


S18C4 



Die Startadressen der Tabellen für die Übersetzung der Tasten-Codes beim JOYCE 
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puffer, ohne eventuelle Änderung der 
Status-Bytes, was bedeutet, daß das To¬ 
ken so übergeben wird, wie es aus der 
KRTerrechnet wurde. 

KM KT PUT $1363 
schreibt ein Key-Token in den Tastatur¬ 
puffer, wobei es “an die Spitze” derdort 
eventuell schon vorhandenen Token 


gesetzt wird. Bei der nächsten Abfrage 
wird dieses Token dann direkt wieder 
zurückgegeben. 

KM KT WRITE BUFFER $13B6 

schreibtein Key-Token in den Tastatur¬ 
puffer und setzt es ans Ende der eventu¬ 
ell schon vorhandenen Token. 

KM KT TEST BUFFER $I3D I 


überprüft, ob Key-Token im Tastatur- 
pu f I er vor h an den sind. 

KM KT TRANSLATE$1298 
übersetzt das im BC-Register überge¬ 
bene Token in ein entsprechendes Zei¬ 
chen aus der Übersetzungstabelle. 

Wie schon erwähnt, errechnet die Inter¬ 
rupt-Routine nicht nur die Key-Token, 


KM KTPUT 


Adresse: $1363 

Hing.: 

B=Tastenstatus 
C=Tastennummer 


Ausg.: 

Benutzte Register: A, BC 

keine Parameter 


KM KT IN1T BUFFER 
Eing.: 

keine Parameter 

Adresse: $1371 

Ausg.: 

Benutzte Register: HL 

keine Parameter 


KM KTREADBUFFER 
Eing.: 

keine Parameter 

Adresse: S137F 

Ausg.: 

CY = 1, wenn Token vorhci. 
B= Tastenstatus 
C=Tastennummer 


Benutzte Register: A, BC 



K M KT W RITE B U FFER 

Adresse: S13B6 

Eing.: 

B= Tastenstatus 

C=Tastennummer 


Ausg.: 

CY = 1, falls Eintrag möglich war 

Benutzte Register: A, BC. HL 


KM KTTEST BUFFER 
Eing.: 

keine Parameter 

Adresse: S13D1 

Ausg.: 

Benutzte Register: A 

C Y = 1, wenn Puffer leer 


KMPTR MODE 

Eing.: 

keine Parameter 

Adresse: $146F 

Ausg.: 

keine Parameter 


Benutzte Register: A, BC, DE. HL 


KMPTR COP Y 

Eing.: 

keine Parameter 

Adresse: $1472 

Ausg.: 

keine Parameter 


Benutzte Register: A, BC, DE. HL 


KM SETSPEED 

Eing.: 

H=Abfrageverzögerung 
L= Repeat Verzögerung 

Adresse: $I4B4 

Ausg.: 

Benutzte Register: HL 

keine Parameter 


KM SET KEY 

Eing.: 

B = neuer Eintrag 
C=Tastennummer 

Adresse: $14B8 


D = Bitmaske der Übersetzungslabelle: 


b()->‘NORMAL* 
bl ->*SHIFT* 
b2 ->‘ALT' 
b3 ->"SHIFT+ALT* 
b4->‘EXTRA* 


Ausg.: 

keine Parameter 


Benutzte Register: A, BC, DE, HL 



KM WAITC'HAR 

Adresse: $1142 

Eing.: 

keine Parameter 

Ausg.: 

Benutzte Register: A 

A=Zeichen, CY=1 

KM FLUSH 

Adresse: S1148 

Eing.: 

keine Parameter 

Ausg.: 

Benutzte Register: A 

keine Parameter 

KMREADCHAR 

Adresse: S114E 

Eilig.: 

keine Parameter 

Ausg.: 

Benutzte Register: A 

CY = 1, wenn gültiges Zeichen, A = Zeichen 

KM OFT STATUS 

Adresse: S115C 

F-ing.: 

keine Parameter 

Ausg.: 

A = $00, C Y=0. wenn kein Zeichen vorhd. 

A = $FF, CY = 1. wenn Zeichen vorhd. 

Benutzte Register: A 


KM READKEY 

Adresse: $ 119C 

Fing.: 

keine Parameter 

Ausg.: 

Benutzte Register: A, BC 

CY = 1, wenn Zeichen vorhd., A = Zeichen 

KM EXP BUFFER 1NIT 

Adresse: $ 11A6 

Eing.: 

DE = S tartadresse Exp. - Bu ffer 

HL = Länge Exp. Buffer 

Ausg.: 

CY = 1, wenn Initialisierung erfolgreich 

Benutzte Register: A, BC, DE, HL 

KM SET EXP AND 

Adresse: $1204 

Eing.: 

B = Exp. Code 

C = Länge desExp.-Strings 

HL=Adresse des Exp.-Strings 

Ausg.: 

CY = 1 .wenn Eintrag durchgeführt 

Z = 1. wenn derneue Exp. Code vorder Anderungaktiv war 

Benutzte Register: A, BC, DE, HL. 

KMGETEXPAND 

Adresse: $1270 

Eing.: 

Ausg.: 

A=Exp. Code 

L=Exp.-String Zähler 

CY = 1. wenn o.k., A=Zeichen 

Z = 1. wenn String-Endeerreicht 

Benutzte Register: A, DE, HL 

KM KTTRANSLATE 

Adresse: $1298 

Eing.: 

B=Tasten,Status 

C=Tastennummer 

Ausg.: 

Benutzte Register: A, BC 

CY = l,wennÜbersetzungo.k.,A=Zcichcn 

KMKTGET 

Adresse: $133B 

Eing.: 

keine Parameter 

Ausg.: 

CY= 1, wenn gültiges Token gelesen wurde 

B= Tastenstatus 

C=Tastennummer 

Benutzte Register: A. BC 
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sondern überprüft sie auch auf eventu¬ 
elle Sonderfunktionen, /.um Beispiel 
Aufruf des Drucker-Menü über die 
PTR -Taste oder der Hardcopy - Routi ne. 
KM PTR MODE $146F 
ruft das Drucker-Menü auf. 

KM PTR COPY $1472 
ruft die Hardcopy-Routine auf. 

Damil können Sic diese Routinen 
zukünftig per Software aus Ihren eige¬ 
nen Programmen heraus aufrufen. 

Zwei weitere Routinen, die die Arbeit 
des Keyboard Managers direkt beein¬ 
flussen, bedürfen noch der Erläute¬ 
rung: 

KM SKT SPEED $14B4 


verändert die Verzögerungswerte für 
Tastaturabfrage und Repeat-Funktion. 
Die Abfrageverzögerung definiert die 
Zeit, in der ein gültiges Token vom 
Keyboard Manager ermittelt und in den 
Tastaturpuffer eingetragen wird. Die 
Repeat- Verzögerung definiert die Ge¬ 
schwindigkeit, mit der Zeichen von der 
Tastatur wiederholt werden können. 
KM SET KEY $14B8 
ändert die Übersetzungstabelle für ein 
bestimmtes Zeichen. Die zu ändernde 
Übersetzungstabelle wird durch eine 
Bitmaske im D-Registerdefiniert. 
Damit können wir das Thema “Key¬ 
board Manager” zunächst abschließen. 


Hinweis 

Da sämtliche hier erläuterten Routinen 
in der System-Speicherbank liegen, 
muß vor dem Aufruf die Speicherbank 
umgeschaltei werden. Dazu läßt sich 
die BIOS-Funktion #30 (USERF) ver¬ 
wenden, die mit 
CALL 0FC5AH 
DEFW routine 

aufgerufen werden kann, “rouline” be¬ 
zeichnet dabei die Adresse der ge¬ 
wünschten System-Routine in der 
Speicherbank #0. 

Norbert Finke/rs 


LISTING >DINPUT <, REMARK = >'<. 

< 11 > 1000 '- 

<86> 1010 ' DINPUT. BAS - Direkte Tastatureingaben 
für 

<89> 1020 ' BASIC-Programme. 

<92> 1030 ' Rechner: . JOYCE (PCW 8256/8512) 

<95> 1040 ' Prg. -Sprache: MALLARD-BASIC 
<98> 1050 ' CP/M-Version: CP/M 3 (PLUS) V. 1.4 

< 2> 1060 ' (c) 1991 Norbert Finke & CPC int. 

< 5> 1070 ' Nach dem Aufruf von DINPUT mit GOSUB 1 

100 

< 8> 1080 ' werden die Tastatur-Eingaben direkt vo 

m 

<28> 1085 ' KEYBOARD-MANAGER geholt 

<38> 1090 '- 

<48> 1100 RESTORE 1330 
< 88 > 1110 ' 

<29> 1120 'Adressen der Aufruf-Routinen festlegen: 
<94> 1130 ' 

<64> 1140 MEMORY HIMEM-6 : status=HIMEM+l 
<56> 1150 MEMORY HIMEM-6:key=HIMEM+l 

< 4> 1160 ' 

<40> 1170 'Maschinenprogramm laden: 

<10> 1180 ' 

<17> 1190 FOR i=key TO key+11 

<27> 1200 READ a$:POKE i ,VAL( "&H"+a$) 

<89 > 1210 NEXT 
<9 3> 1220 ' 

< 0> 1230 'Eingabe-Routine auf Maschinen-Routine 
<43> 1240 'umleiten: 

< 3> 1250 ' 

<51> 1260 OPTION INPUT=UNT(Status) ,UNT( key) 

< 9> 1270 ' 

<56> 1280 '- fertig - 
<15> 1290 ' 

<84> 1300 RETURN 

<20> 1310 ' - 

<63> 1320 ' . Maschinen-Programm 

<13> 1330 DATA CD,5A,FC . 'CALL FC5A 

<51> 1340 DATA 42,11 . 'DEFW KM WAIT CHAR 

<40> 1350 DATA C9 . 'RET 

<22> 1360 DATA CD,5A,FC . 'CALL FC5A 

<71 > 1370 DATA 4E,11 . 'DEFW KM READ CHAR 

<49> 1380 DATA C9 . ' RFJT 


KEYSET.PAS - zeigt die aktuelle Tastatur¬ 
belegung auf dem Bildschirm an. 

Rechner: JOYCE (PCW 8256/8512) 

Prg.-Sprache: TURBO-PASCAL 3.0 
CP/M-Version: CP/M 3 (PLUS) V. 1.4 

written 1990 by NoFi 


PROGRAM KEYSET; 


CONST 

bios_userf = $FC5A; (* BIOS-Funktion #30 
(* Ausgabetexte: 

stat text : ARRAY[0..4] OF STRING(9] = 

( ' HOPMBT. ' '5HTC"? > 


'NORMAL 
'ALT 

'ALT+EXTRA' 


'SHIFT 
’EXTRA 


(* Definition des Tastenstatus: 
stat bit : ÄRRAY[0..4] OF BYTE = 
($00,S20,$80,$02,$A0); 

VAR 

key, ascii, i : BYTE; 
tflag : BOOLEAN; 

(* - 

FUNCTION keynum : BYTE; 

(* holt ein Key-Token aus dem Tastaturpuffer 
(* und übergibt die Tasten-Nummer 

CONST 

km kt get = $133B; (* System-Einsprung 
VAR ~ ~ 

tnum : BYTE; 


BEGIN 
INLINE( 

SCD/bios userf/ (* L: 

km kt get/ (* 

$3Ü/$F9/ (* 

$79/ (* 

$32/tnum); (* 

keynum:=tnum; 

END; (* keynum 

( 


CALL bios userf 
DEFW KM KT GET 


JR 

LD 

LD 


NC7L “ 
A,C 

(tnum),A 


) 


FUNCTION translate 

(key, stat : BYTE; VAR ret : BYTE) : BOOLEAN; 
(* Übersetzt ein Key-Token entsprechend der *) 
(* aktuellen Tastaturbelegung *) 

CONST 

km kt translate = $1298;(* System-Einsprung 

VAR 

tret : BYTE; 
ttran : BOOLEAN; 

BEGIN 
INLINE( 

$3A/key/ 

$4F/ 

$3A/stat/ 

$47/ 

SCD/bios userf/ 
km kt translate/ 

$32/tret/ 

$9F/ 

$32/ttran) ; 
ret: = tret; 
translate : =ttran ; 

END; 

( * - - - 

PROCEDURE expand(zehn : BYTE); 

(* Liest den Expansions-String einer Taste 
(* und gibt ihn am Bildschirm aus. 


LD A,(key) 

LD C, A 
LD A,(stat) 

LD B,A 

CALL bios userf 

DEFW KM KT TRANSLATE 


LD 

SBC 

LD 


(tret),A 
A, A 

(ttran),A 


(* translate 
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CONST 

km_get_expand = $1270; (* 
zmask = $40; (* 

VAR 

zflag, exp_zchn : BYTE; 
exp count : INTEGER; 


System-Einsprang 
Maske für Z-Flag 


BEGIN 

IF zehn IN [$80..$9F] 
THEN zflag : = 0 
ELSE zflag := 1; 
exp count : = 0 ; 

WHILE zflag = 0 DO 
BEGIN 
INLINE( 

$2A/exp count/ 
$3A/zcnn/ 
$CD/bios_userf/ 
km get_expand/ 
$37/exp zehn/ 

$F5/ “ 

$C1/ 

$79/ 

$E6/zmask/ 

$32/zflag); 

IF zflag = 0 
THEN 
BEGIN 


N ( $00..$1F] (* -Code? 
',CHR(exp zehn + $40)) 


exp_count := SUCC(exp_count); 

IF exp zehn IN 
THEN WKITE 

ELSE WRITE(exp zehn); 

END; 

END; 

WRITELN; 

END; (* expand 

( * - 

BEGIN (* main 

REPEAT 
CLRSCR; 

WRITE('Bitte Taste drücken ... '); 

WRITE(' (>STOP< = Ende) '); 

key:=keynum; (* Tastennummer holen 

WRITELN; WRITELN; 

WRITE(' Sie haben die Taste #',key); 

WRITELN(' gedrückt'); 

WRITELN('Die Taste ist wie folgt belegt:'); 
FOR i:= 0 TO 4 DO 

BEGIN (* Tasten-Belegung ausg. 

WRITE(stat_text(i], ' : '); 
tflag:=translate(key,stat bit[i],ascii); 
IF tflag = FALSE 
THEN WRITELN('n.b.') 

ELSE , „ 

IF ascii IN [$80..$9E] (* Exp.-Code ? 

THEN expand(ascii) (* - Ja - 

ELSE (* ~ Nein - 

IF (ascii < $20) 

THEN WRITELN( ' A ' ,CHR(ascil+$40 ) ) 

ELSE WRITELN(CHR(ascii)); 

END; 

DELAY (2500) ; ^ ...... 

UNTIL key =66; (* Stop-Taste gedruckt? 

END. (* main 

(* - - - 


(* Nur ausführen, wenn *) 
(* Exp.-Code gültig! *) 

(* Exp.-String - Zähler *) 


LD HL,(exp count) 

LD A f (zchnJ 
CALL bios_userf 
DEFW km_get expand 
LD (exp zehn),A 
PUSH AF “ 

POP BC 
LD A,C 
AND A,zmask 
LD (zflag),A 
Ausfuhren, wenn 
String-Ende noch nicht 
erreicht 


EXPDEMO.MAC - Demonstration verschiedener System- 
Aufrufe zur Einrichtung eines neuen Expansions- 
Puffers, Neu-Belegung der Taste >EINBL< mit einem 
Expansions-String und anschließender reinitiali- 
sierung des Default-Expansions Buffer. 

Abbruch des Programms: STOP / A C 
Rechner: JOYCE (PCW 8256/8512) 

Prg.-Sprache: Assembler (M80) 

CP/M-Version: CP/M 3 (PLUS) V. 1.4 

(c) 1991 Norbert Finke & CPC International 


. Z80 
AS EG 

ORG 0100h 

Einrichten des neuen Puffers ab Adresse $C400 in 
der COMMON-Memory 


bios userf equ 0fc5ah ;BIOS-Funktion #30 (USERF) 
nexpbuf equ 0c400h ;Startadresse neuer Puffer 

nexplen equ 0400h ;Länge des neuen Puffers 

km_exp_buffer_init equ 0lla6h ;System-Adresse 

ld de,nexpbuf ;Adresse -> DE 

ld hl,nexplen ;Länge -> HL 

call bios_userf ;Puffer einrichten 

defw km_exp_buffer_init 

;neuen Expansions-String in die COMMON-Memory 
; übertragen 

exp strlen equ 21 ;Länge des neuen Strings 

common start. equ OcOOOh ;Start-Adr. der COMMON- 

Memory 

ld hl,nexp string ;String-Adresse -> HL 
ld de,comraon_start ;Ziel-Adresse -> DE 
ld bc,exp strlen ;String-Länge -> BC 
ldir ;und String in COMMON-Memory 

;übertragen 

;Expansions-String in Expansions-Puffer eintragen 

exp_code equ 9dh ;Exp.-Code für neuen String 

km_set_expand equ 01204h ;System-Adresse 

ld b,exp_code ;Exp.-Code -> B 

ld c,exp_strlen ;String-Länge -> C 

ld hl,common Start ;String-Adresse->HL 
call bios_userf ;String eintragen 
defw km_set_expand 

;Der Expansions-Code ($9D) muß noch der Taste 
;>EINBL< zugeordnet werden 

keynum equ 03 ;Nummer der 'EINBL'-Taste 

keystat equ 01 ;Status = 'NORMAL' 

km_set_key equ 0l4b8h ; System-Adresse 

ld b,exp_code ;Exp.-Code -> B 

ld c,keynum ;Tastennummer -> C 

ld d,keystat ;Status-Maske -> D 

call bios_userf ;Übersetzungstabelle 
;ändern 

defw km_set_key 

;Tastatur abfragen und Zeichen ausgeben, bis 
;'STOP'-Taste gedrückt wurde 

ascii_stop equ 03 

km_wait_char equ 01142h 
te_txt_output equ 0548h 


wait_stop: 

call bios_userf 
defw km wait char 
cp ascii_sT:op 
j r z,end_demo 
ld c f a 
call bios_userf 
defw te txt output 
jr wart_stop ;wiederholen,bis STOP 

;Zum Ende des Programms muß der Default- 
;Expansions-Puffer wieder eingerichtet werden, 
;damit die COMMON-Memory für das nächste Programm 
;wieder frei wird. 

dexpbuf equ 02876h ;Adresse Default-Exp.-Puffer 
dexplen equ 097h ;Länge Default-Exp.-Puffer 

end demo: 

ld de,dexpbuf ;Adresse -> DE 

ld hl,dexplen ;Länge -> HL 

call bios_userf ;und Puffer 

;initialisieren 
defw km_exp_buffer_init 

/ 

; - fertig 

jp o ;WBOOT ausführen 

;der neue Erweiterungs-String für die EINBL-Taste: 
nexp string: 

defb 'Erweiterte Funktion',10,13 
end 


; ASCII-Zeichen der 
;Stop-Taste 
; System-Adresse 
; System-Adr.(Zeichen- 
Musgabe) 


;Eingabe holen 

;STOP-Taste gedrückt? 
;- ja, Demo beenden - 
;sonst Zeichen -> C 
:und ausaeben 
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WinGlobe 

Der Sieger des 
Digiglobe- We ttbewerbs 

Viele Zuschriften erreichten uns, und wir benötigten eine 
Weile, um alles so richtig auszuwerten. Die Auswahl fiel 
uns sehrschwer, da durchweg alle Einsendungen in ihrer 
Ausführung spitze waren. Hier nun die ersten beiden 
Plätze. 



Den zweiten Platz belegt Martin 
Schmid aus Moosburg. Br gewinnt ei¬ 
nen CPC 464 plus mit Monochrommo¬ 
nitor. Seine Einsendung ist eine durch 
Einbau von Maschinencode stark be¬ 
schleunigte Variante des Digiglobe- 
Programms. In wenigen Sekunden ist 
der Globus in der jeweiligen Stellung 
aufgebaut. Ist das Bild fertig gezeich¬ 
net. so kann es durch Drücken einer Ta¬ 
ste ausgedruckt werden. Ansonsten ist 
die Bedienung die gleiche wie in der 
Urversion. Das Programm finden Sie 
auf der DATABOX; auf dem 464 läuft 
es nur mit dem Emulator. Der Sieger 
des Digiglobe-Wettbewerbs ist Ronald 


Heitmann mit seinem aufwendigen 
Programm WinGlobe. Er erhält einen 
CPC 6128 plus mit Farbmonitor. Wie 
der Name schon ahnen läßt, handelt es 
sich bei dem Siegerprogramm um ein 
Programm mit grafischer Benutzer¬ 
oberfläche. Leider funktioniert es nur 
auf dem CPC 6128. Die abgetippten 
Programme speichern Sie alle auf einer 
Diskette. Nun starten Sie WINLINK. 
welches die lauffähige Datei erzeugt. 
Nach dem anschließenden Start von 
STAEDTE.GEN, welches die leeren 
Dateien für die Örtsverwaltung erstellt, 
ist das Programm lauffähig. Die Bedie¬ 
nung erfolgt mit dem Joystick oder den 


Cursortasten. Das gesamte Programm 
ist so gestaltet, daß die Tastatur so we¬ 
nig wie möglich bemüht werden muß. 
I lat man eins der zwölf Icons angc- 
wählt. so startet man die entsprechende 
Aktion mildem Feuerknopf. 

Zusätzlich ist noch eine Hardcopy- 
Routine dazugekommen, mit der auf 
verschiedene Papiergrößen gedruckt 
werden kann. 

Da sich das Programm einfach bedienen 
läßt, haben wiraus Platzgründen aufeine 
ausführliche Beschreibung im Heft ver¬ 
zichtet. Aufder DATABOX liegt aberei- 
ne Programmbeschreibung vor. 

ja 

Jo 


5 ' GLOBE.BAS 

6 '(c)1992 Ronald Heitmann 

7 ' & CPC International 

8 ' fuer CPC 6128 

10 OPENIN"orte":LINE INPUT#9,sd$ :CLOSEIN:C 
ALL &BB00:DEFINT x,y,t,f:DEG:rx=210:ry=196 
:DIM t$(l) # pa(5,4),s(3):t$(0)="Nein":t$(l) 
= " Ja" : FOR t=0 TO 5:FOR tt=0 TO 4:READ pa(t 
,tt):NEXT:NEXT:pa=0:s(0)=0:s(l)=l:s(2)=l:s 
( 3)=2 :GOSUB 1730.-FOR t=65 TO 92 :d$=d$+CHR$ 
(t) 

20 NEXT:FOR t=48 TO 57:d$=d$+CHR$(t):NEXT: 
d$=d$+"-+":tm=l:x%= 0 :an%= 0 :e%= 0 :sh%= 0 :fr%= 
0 :da$="a":mx=215:my= 200 :a=0:b= 0 :f= 0 :g= 10 :s 
w=l0:v=0:FOR t=0 TO 25:CALL &BD19:OUT &BC0 
0,6:ÖUT &BD00,t:NEXT:GOTO 130 
30 IF tm THENIGETCOR,@x,@y,@t,@fa, 0 ,l,v: I D 
RAW,t,fa,x*rx/255+mx,y*ry/255+my:t=l:RETUR 
N 

40 q=SIN(o-f):e=COS(o-f):u=COS(l):w=SIN(l) 
:IF rx*(w*h*k-u*q*j+u*e*m*k)<0 THEN IF v =0 
THEN t=0 ELSE fa=l 

50 uu=u*e:x=mx+rx*(u*q*k+w*h*j+uu*m*j):y=m 
y+ry*(w*m-uu*h):IDRAW,t,fa,x,y:t=l:RETURN 
60 1SETW,a,b,f:c= 0 :d= 0 :GOSUB 120 :t= 0 :x= 0 :y 
= 0 : 3 =SIN(b):k=COS(b):h=SIN(a):m=COS(a):IF 
gz =0 THEN 80 

70 FOR o=g TO 360 STEP g:FOR 1=90 TO-90 ST 
EP-sw:fa=2 :GOSUB 30 :NEXT: t=0 :NEXT: FOR l=-9 
0 +g TO 90-g STEP g:FOR 0=0 TO 360 STEP sw: 
fa= 2 :GOSUB 30:NEXT:t=0:NEXT 
80 RESTORE 1740 

90 READ n,1,o:IF n =0 THEN RETURN 

100 fa=3:GOSUB 30:IF fl THEN RETURN 

110 FOR i=2 TO n:READ 1,o:t=l:fa=3:GOSUB 3 

0:IF fl THEN RETURN:ELSE NEXT:t=0:GOTO 90 

120 t=l:MOVE rx+mx,my:FOR i =0 TO 370 STEP 

sw:DRAW rx*COS(i)+mx,ry*SIN(i)+my,2:NEXT:R 

ETURN 

130 xx=540:yy=200 


[798] 

[1808] 

[2118] 

[979] 

[14706] 


[12033] 

[4506] 

[6482] 

[5009] 

[6691] 

[8819] 


[571] 

[2156] 

[1643] 

[5034] 

[4818] 


[1321] 


jVE xx,yy 


x =0 TO 2 :by=l 

[7379] 

:,by+22 ,by :NEX 


ON PEEK(0)+1 

[6442] 


140 |BUTTC 
31-y*28:II 
T:NEXT:MO\ 

150 1 

GOTO 150,1210,1720,170,200,210,220,230,320 
,420,490,530,71.0 

160 ORIGIN 0 , 0 :MOVE xx,yy:GOTO 150 

170 RESTORE 2270:GOSUB 2240:y=292:a$=STR$( 

a)+"#":GOSUB 2230:a$=STR$(b)+"#":GOSUB 223 


[1223] 

[11680] 


0 :a$=STR$(f)+"#":GOSUB 2230:IF g THEN a$=" 
Alle"+STR$(g)+"#"ELSE wi$="Kein Gitter" 

180 GOSUB 2230:a$=STR$(sw)+"#":GOSUB 2230: [7146] 
a$=t$ (v) :GOSUB 2230:IF da$o"a"THEN a$=da$ 

ELSE a$="Kein Ort !" 

190 GOSUB 2230:CALL &BB18:IGET:GOTO 160 
200 RESTORE 2280:GOSUB 224Ö:w=a:GOSUB 590: 
a=w:GOTO 140 

210 RESTORE 2300:GOSUB 2240:w=b:GOSUB 590: 
b=w:GOTO 140 


[2367] 

[2776] 


220 RESTORE 2310:GOSUB 2240:w=f:GOSUB 590: 
f=w:GOTO 140 
230 


[2094] 

[3071] 

[7990] 


RESTORE 2 320:GOSUB 2240: I SWITCH: ISWITC 
H,25,9:|SWITCH,25,11:RESTORE 2330:GOSUB 22 
50:MOVE 320,200:GOTO 270 

240 | POINTER:ON PEEK(0)+1 GOTO 240,250,260 [2795] 
,280 


250 

260 

270 

280 

290 

300 

310 

320 


v= 0 :GOTO 270 
v=l 

v+ 1 , 0 :GOTO 240 
GOTO 140 
GOTO 310 

tm=l 

^SW.ON,tm+1,0:GOTO 430 


v=l 

I SW.ON,' 
I GET: GO r 
tm=0:GO: 


ESTORE 2340:GOSUB 2240 
SWITCH,25,9:RESTORE 
14,458,236,260:MOVE 320,200: 


': I SWITCH 
: 2350:GOS 




SWITC 
B 225 
SW. ON 


H,25,7 : 

0:|BOX, 

,gz+l,0:GOTO 400 
330 |POINTER:ON PEEK(0)+1 GOTO 330,340,350 
,370,390,410 
340 gz=0:GOTO 360 


[1295] 

[326] 

[1277] 

[1391] 

[1043] 

[ 259 ] 

[1890] 

[7251] 


[3349] 

[1187] 
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350 

360 


JZ=1 


fi$=STR$(g)+"#":[CLG,240,53, 
2,0,0,400,470,254,l,§wi$:GOTO 330 


57,10,10:| 


6: 1 

:GO 


BO 

S 


|SW.OK,gZ+1,0:GOTO 330 
370 g=g+l:IF g=37 THEN g=36 
380 GOTO 400 

390 g=g-l:IF g=0 THEN g=l 
400 wi$=£ 

TEXT,2 

410 GET:GOTO 140 

420 RESTORE 2360:GOSUB 2240:GOSUB 2250: 

X,248,382,250,290: I SWITCH*: | SWITCH, 29,16 
WITCH,29,18:|SW.ON,tm+l,0:MOVE 320,180 
0 470 

430 I POINTER 
,480,290,300 

440 sw=sw+l:IF SW=13 THEN 
450 GOTO 470 
460 sw=sw 
470 
EXT 

480 IGET:GOTO 140 

490 RESTORE 2370:GOSUB 2240:GOSUB 2250:|SW 
SWITCH,25,7+2*t:NEXT:MO 


[282] 

[2374] 

[913] 

[452] 

[748] 

[4184] 

[1391] 

[6448] 


|CLG,2. 

', 2 , 0 , 0 ,; 


GOTO 430,440,460 

[3420] 

[ SW=12 

[1166] 


[454] 

SW=1 

[1553] 

,$=STR$(sw) + "#": |T 

[4719] 


:ii 


[1391] 

[5374] 


ITCH:FOR t=0 TO 5 
VE 320,102:GOTO 51 
500 I POINTER:ON PEEK(0)+1 GOTO 500,520:pa= [3991] 
PEEK(0)-2:GOSUB 1730 

SW.ON,pa+l,0:GOTO 500 
GET:GOTO 140 

tESTORE 2380:GOSUB 2240:GOSUB 2250 
SWITCH,12,14:jSWITCH,12,16:MOVE 3 
102:GOTO 570 

540 I POINTER:ON PEEK(0)+1 GOTO 540,900,920 [4733] 
,950,960,980,1020,550,560,1050,580 
550 POKE &A700,0:GOTO 570 
560 POKE &A700,1 

SW.ON,PEEK(&A700)+1,0:GOTO 540 
GET:GOTO 140 

LESTORE 2290:GOSUB 2250:I BOX,248,382,2 



1 : I SW 
320, 


570 
580 
590 

58,298:MOVE 316,180 
600 |CLG,240,37,43,8,8:wi$=STR$(w):|TE 
XT,3,0,0,144,480,284,1,@wi$ 

610 |POINTER:ON PEEK(0)+1 GOTO 610,620,640 
,660,680,700 

620 w=w+l:IF w>181 THEN w=180:GOTO 610 
630 GOTO 600 

640 w=w+10 : IF W> 180 THEN w-180 
650 GOTO 600 

660 w=w-l0:IF w<-180 THEN w=-180 
670 GOTO 600 

680 w=w-l:IF w=-181 THEN w=-180:GOTO 610 
690 GOTO 600 
700 IGET:RETURN 

710 RESTORE 2400:GOSUB 2240:GOSUB 2250:1 SW 

:=Ö T 


[1825] 

[1391] 

[6203] 


[1768] 

[333] 

[2638] 

[1391] 

[3200] 


ITCH: 


H:I SWITCH,17,15:|SWITCH,17,13:FOR 
O 3:GOSUB 890:NEXT:MOVE 320,200 
7 20 IBLACK, s (0), s (1),s(2),s(3):|SW.ON,en+l 
,0:1 POINTER:ON PEEK(0) + 1 GOTO 720,740,740, 
740,760,770,780,850,860,870,870,870,870,73 
0 

730 IGET:GOTO 140 

740 GET:GOSUB 810:IF en THEN[STORE,1,54,1 
,25:ORIGIN 0,0,0,428,0,398:CLG:ry=ry-4:rx= 
19 0+((PEEK(0)=l)*30) + ((PEEK(0)=3)*10):GOSU 
B 60 

750 I HC,PEEK(0)-1:IF en THEN 800 ELSE 140 
760 GET: I STORE,1,54,1,25:ORIGIN 0,0,0,432 
,0,398:ht=l:mx=386:rx=386:ry=394:my=2:GOSU 
B 820:my=396:GOSUB 820:mx=0:my=2:x=12:GOSU 
B 840:GOSUB 820:ray=396:GOSUB 820:GOTO 800 
770 |GET:|STORE,1,54,1,25:ORIGIN 0,0,0,428 
, 0 , 398:ht=2:mx=426:rx=376:ry=398:my=398:PR 
INT#8,CHRS(27);"A";CHR${6);:x=38:GOSUB 840 
:GOSUB 830:mx=0:GOSUB 830:x=77:GOSUB 840:m 
x=426:my=0:GOSUB 830:rnx=0:GOSUB 830:x=39:G 
OSUB 840:GOTO 800 

780 IGET:I STORE,1,54,1,25:ORIGIN 0,0,0,432 
,0,398:ht=l:rx=760:ry=776:mx=760:my=-388:G 
OSUB 820:my=0:GOSUB 820:my=388:GOSUB 820:m 
y=776:GOSUB 820:x=24:GOSUB 840:mx=380:my=- 
388:GOSUB 820:my=0:GOSUB 820:my=388:GOSUB 
820:my=776:GOSUB 820:x=24:GOSUB 840:mx=0 
790 my=-388:GOSUB 820:my=0:GOSUB 820:my=38 
8 :GOSUB 820:my=776:GOSUB 820:x=24:GOSUB 84 
0 :inx=-380 :my---388:GOSUB 820 :my=0-.GOSUB 820 
:my=388:GOSUB 820:my=776:GOSUB 820:x=24:GO 
SUB 840 

800 IGET:ORIGIN 0,0,0,638,0,398:mx=215:my= 
200:rx=210:ry=196:|RAHMEN,1,54,1,25:GOTO 1 
40 

810 MOVE 0,0:DRAWR 428,0,0:DRAWR 0,398:DRA 
WR-428,0:DRAWR 0,-396:DRAWR 430,0:DRAWR 0, 
396:RETURN 

820 CLG 0:GOSUB 60:FOR X=388 TO 436 STEP 2 
:MOVE x,0:DRAWR 0,398,0:NEXT:|HC,ht:RETURN 


[3745] 

[3545] 

[2554] 

[413] 

[2261] 

[413] 

[1235] 

[413] 

[1376] 

[413] 

[1023] 

[6096] 


[8372] 


[1391] 

[7934] 


[1419] 

[9486] 


[13262] 

[16639] 

[11076] 

[5583] 

[4981] 

[4085] 


830 CLG 0-.GOSUB 60 : | HC, ht:RETURN 
840 FOR t=l TO x:PRINT#8:NEXT:RETURN 
850 en=l:GOTO 720 
860 en=0:GOTO 720 

870 t=PEEK(0)-9:s(t)=s(t)+l:IF s(t)=ll THE 
N s(t)=0 

880 GOSUB 890:GOTO 720 

890 wiS = STR$(s(t)*10) + "%":|CLG,240,59,65,1 
3+t*2.2,15+t*2.1:|TEXT,240,2,0,0,480,500,1 
94-36*t, 1, @wi$ : RETURN 

900 IGET:GOSUB 1060:IF f$>""THEN LOAD""+f$ 
,&C0Ö0 

910 GOTO 530 

920 GOSUB 2200:IF h$ = ""THEN 530 
930 ma%=17:GOSUB 1970:1? e%=0 THEN SAVE h$ 
,b, StCOOO, &3FFF 
940 GOTO 530 

950 [GET:GOSUB 1060:IF f$=""THEN 530 ELSE 

LOAD""+f$,&6500:GOTO 1010 

960 GOSUB 2200:IF h$=""THEN 530 

970 ma%=ll:GOSUB 1970:IF e%=l THEN 530 ELS 

E|STORE,1,54,1,25:SAVE h$ ,b, &6500,10804:GO 

TO 1010 

980 ma%=0:GOSUB 1060:IF f$=""THEN 530 ELSE 
RESTORE 2480IGOSUB 2240:GOSUB 2250:|TEXT, 
3,0,0,100,540,228,l,§f$:MOVE 320,200 
990 |POINTER:x%=0:ON PEEK(0)+1 GOTO 990,10 
00,1010 

1000 GOSUB 1970:IF e%=0 THEN|ERA,§f$ 

1010 |GET:GOTO 530 

1020 ma% = 0 :GOSUB 1060:IF f$=""THEN 530 ELS 
E RESTORE 2490:GOSUB 2240:|TEXT,3,0,0,100, 
540,228,1,@f$ : |BOX,228,400,154,180:ac$=d$: 
xl=31:x2=48:yl=15:x=244:y=174:h$=f$:GOSUB 
2050:|GET:x%=0:IF h$=""THEN 1040 
1030 GOSUB 1970:IF e%=0 THEN|REN,@h$,@f$ 
1040 IGET:GOTO 530 

1050 GOSUB 1060:GOTO 530:|GET:RESTORE 2520 
:GOSUB 2240:1=15:h$="":GOSUB 2210:IF h$="" 
THEN 1210 

1060 GOSUB 1120:IF an%THEN RESTORE 2460:GO 
SUB 2240:ac$=d$:n=l:GOSUB. 1150:MOVE 320,18 
ELSE RETURN 

1070 xs=XPOS:y=YPOS:GOSUB 1130-.MOVE xs,y 
1080 I POINTER:IF PEEK(0)=0 THEN 1080 ELSE 
ON PEEK(0)GOSUB 1160,1190 

1090 IF PEEK(0)=4 THEN|GET:f$="":RETURN EL 
SE IF PEEK{0)=3 THEN BÖRDER 20,1:i$ = "":WHI 
LE i$ = "" :i$---UPPER$( INKEY$ ) :WEND:GOSUB 17 30 
:n=INSTR(ac$,i$):GOSUB 1150:GOTO 1070 
1100 IF PEEK{0)>4 THEN|NUM,@x%,h:f$=SPACE$ 
(12):|FILE,x%+PEEK(0)-6, @kb% ,@f$:|GET:RETU 
RN 

1110 GOTO 1070 

1120 f$="": |GET:GOSUB 1930:IF e% = l THEN an 
%=0:RETURN ELSE|CAT,@an%:RETURN 
1130 kb% = 0:WINDOW#1,13,27,4,23:PAPER#1,1:C 
LS#l:|RAHMEN,24,56,4,25:RESTORE 2470:GOSUB 
2250:FOR t=0 TO 9:h$=SPACE$(12):|FILE,t+x 
%-l,@kb%,@h$:IF LEFT$(h$,l)=MID$(ac$,n,l)T 
HEN h$=h$+DEC$(kb%,"###")+"K":|BUTTON,@h$, 
28,52,171-14*t,159-14*t 
1140 NEXT:RETURN 

1150 h=ASC(MID$(ac$,n,1)):x%=0:|NUM,@x%,h: 

IF X%>0 THEN RETURN 

1160 n=n+l:IF n=29 THEN n=l 

1170 GOTO 1150 

1180 h=ASC(MID$(ac$,n,1)):x%=0:|NUM,§x%,h: 

IF X%>0 THEN RETURN 

1190 n=n-l:IF n=0 THEN n=28 

1200 GOTO 1180 

1210 RESTORE 2510:GOSUB 2240:GOSUB 2250:MO 
VE 320,100 

1220 I POINTER:ON PEEK(0)+1 GOTO 1220,1230, 
1460,1480,1510,1530,1590 

1230 GOSUB 1250:IF nr>0 THEN.OPENIN CHR$(a 
c):INPUT#9,x%:FOR t=l TO nr:LINE INPUT#9,d 
a$:LINE INPUT#9,du$:INPUT#9,a:INPUT#9,f:NE 
XT:CLOSEIN 
1240 GOTO 1210 

1250 ma%=0:ac=ASC(LOWER$(LEFTS(da$,1))) :GO 

SUB 2010:IF e%THEN 1210 

1260 IF sd$=" "THEN RETURN 

1270 RESTORE 2540:GOSUB 2240:h=0:GOSUB 139 

0:MOVE 320,18 

1280 xs=XPOS:y=YPOS:GOSUB 1360:MOVE xs,y:| 
POINTER:IF PEEK(0)=0 THEN 1080 ELSE ON PEE 
K(0)GOSUB 1320,1340 

1290 IF PEEK(0)=4 THEN|GET:nr=0:RETURN ELS 
E IF PEEK(0)=3 THEN BORDER 0,26:i$="":WHIL 
E i$ = "":i$=LOWER$(INKEYS):WEND:ac=ASC(i$) : 
GOSUB 1730:GOSUB 1390 

1300 IF PEEK(0)>4 THEN nr=h+PEEK(0)-4:|GET 


[1519] 

[2060] 

[644] 

[897] 

[3518] 

[1946] 

[6384] 


[3359] 

[419] 

[893] 

[3166] 

[419] 

[ 3879 ] 

[893] 

[5083] 


[5753] 


[3271] 

[2678] 

[1361] 

[11332] 


[2542] 

[1361] 

[5892] 


[8241] 


[2947] 

[4485] 

[10128] 


[5354] 


[317] 

[5353] 

[12607] 


[940] 

[3219] 

[ 1202 ] 

[309] 

[3219] 

[1032] 

[399] 

[3505] 

[3409] 

[8312] 


[305] 

[4935] 

[604] 

[2818] 

[6565] 


[8487] 


[3456] 
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:RETURN 

1310 GOTO 1280 

1320 IF an>h+10 TUEN h=h+10:RETURN 

1330 h=0:GOTO 1400 

1340 IF h>0 THEN h=h-10:RETURN 

1350 h=100:GOTO 1430 

1360 IF h>an THEN h=h-ll:GOTO 1360 

1370 kb%=0:WINDOW#1,13,27,4,23:PAPER#1,1:C 

LS#1: I RAHMEN,24,56,4,25:aa=an:RESTORE 2 47 0 

:GOSUB 2250:an=aa:FOR t=0 TO 9:IF o$(t+h)> 

""THENI BUTTON,@0$(t+h),28,52,171-14*t,159- 

14*t 

1380 NEXT:RETURN 

1390 IF INSTR(sd$,CHR$(ac))>0 THEN OPENIN 
CHR$(ac):INPUT#9,an:GOTO 1450 
1400 ac=ac+l:IF ac=123 THEN ac=97 
1410 CLOSEIN:GOTO 1390 

1420 IF INSTR(sd$,CHR$(ac))>0 THEN OPENIN 
CHR$(ac):INPUT#9, an:GOTO 1450 
1430- ac=ac-l:IF ac=96 THEN ac=122 
1440 CLOSEIN:GOTO 1420 

1450 o$(l)=" ":ERASE o$:DIM o$ (10*(INT(an/ 
10 ) + 1)):FOR t=0 TO an-1:LINE INPUT#9,0$(t) 

:LINE INPUT#9,b$:INPUT#9,aa:INPUT#9,aa:NEX 
T:CLOSEIN:RETURN 

1460 IGET:al$="":a2$="":al=a:a2=f:GOSUB 16 
90:IF e%=l THEN 1210 

1470 ac=ASC(LOWER$(LEFT$(a$,1))):GOTO 1600 
1480 GOSUB 1250:IF nr=0 THEN 1210 
1490 OPENIN CHR$(ac):INPUT#9,x%:FOR t=l TO 
nr:LINE INPUT#9,al$:LINE INPUT#9,a2$:INPU 
T#9,al:INPUT#9,a2:NEXT:CLOSEIN:GOSUB 1690: 
IF e%=l THEN 1210 
1500 GOSUB 1650:GOTO 1470 
1510 GOSUB 1250:IF nr=0 THEN 1210 
1520 GOSUB 1650:GOTO 1210 
1530 IF sd$=""THEN 1210 

1540 PRINT#8,CHR$(27);;CHR$(27);"x";CHR 
$(1);CHR$(27);"A";CHR$(10);CHR$(14);SPACE$ 
(11);"Ortsliste Winglobe":x=4:GOSUB 840:ac 
= 97 

1550 GOSUB 1570:ac=ac+l:IF ac=123 THEN 121 
0 

1560 PRINT#8:PRINT#8:GOTO 1550 
1570 OPENIN CHR$(ac):INPUT#9,an:FOR t=l TO 
an:LINE INPUT#9,a$:LINE INPUT#9,b$:INPUT# 
9,aa,ff:a$=a$+" "+STR$(aa)+CHR$(27)+"S0o" 
+CHR$(27)+"T"+STR$(ff)+CHR$(27)+"S0o"+CHR$ 
(27)+"T":PRINT#8,SPACE$(40-LEN(a$)/2);a$:P 
RINT#8,SPACES(40-LEN(b$)/2);b$:PRINT#8:NEX 
T 

1580 CLOSEIN:RETURN:2=0 
1590 |GET:GOTO 140 

1600 GOSUB 2010:IF INSTR(sd$,CHR$(ac))=0 T 
HEN sd$=sd$+CHR$(ac):GOSUB 1710 
1610 OPENIN wi$:OPENOUT"DU":INPUT#9,an:f1= 
0:al$="":PRINT#9,an+l:FOR t=l TO an:LINE I 
NPUT#9,x$:LINE INPUT#9,X2$:INPUT#9,aa,ff:I 
F LOWERS(a$)>LOWER$(al$)AND LOWER$(a$)<LOW 
ER$(x$)THEN PRINT#9,a$:PRINT#9,b$:PRINT#9, 
al,de:f 1=1 

1620 al$=a$:PRINT#9,xS:PRINT#9,x2$:PRINT#9 
,aa:PRINT#9, f f:NEXT:IF fl THEN 1640 
1630 PRINT#9,a$:PRINT#9,b$:PRINT#9,al,de 
1640 GOSUB 1680:GOTO 1210 

1650 GOSUB 2010:OPENIN wi$:OPENOUT"DU":INP 
UT#9,an:PRINT#9,an-1:FOR t=l TO an:LINE IN 
PUT#9,x$:LINE INPUT#9,x2$:INPUT#9,aa,ff:IF 
tonr THEN PRINT#9 ,X$ : PRINT#9 ,x2$ : PRINT#9 
,aa,ff 

1660 NEXT:GOSUB 1680:IF an>l THEN RETURN 
1670 t=INSTR(sd$,CHR$(ac)):sd$=LEFT$(sd$,t 
-1)+RIGHT$(sd$,LEN(Sd$)-t):GOSUB 1710 
1680 CLOSEOUT:CLOSEIN:du$="du":|ERA,@wi$:| 
REN,@wi$,@du$:RETURN 

1690 IGET:RESTORE 2520:GOSUB 2240:1=15:h$= 
al$:GOSUB 2210:|GET:IF h$=""THEN e%=l:RETU 
RN 

1700 a$=h$:RESTORE 2280:GOSUB 2240:w=al:GO 
SUB 590:al=w:|GET:RESTORE 2310:GOSUB 2240: 
W=a2:GOSUB 596:de=w:RESTORE 2530:GOSUB 224 
0:|TEXT,3,0,0,100,540,260,l,@a$:h$=a2$:l=5 
0 :GOSUB 2220:b$=h$:e%=0:RETURN 
1710 OPENOUT"orte":PRINT#9,sd$:CLOSEOUT:RE 
TURN 

1720 FOR y=4 TO 396 STEP 2:MOVE 2,y:DRAWR 
424,0,0:NEXT:GOSUB 60:ORIGIN 0,0:MOVE mx,m 
y:|SEEK:GOTO 160 

1730 FOR t=0 TO 3:INK t,pa(pa,t):NEXT:BORD 
ER pa(pa,4):RETURN:DATA 0,7,18,26,0,26,18, 
7,0,26,0,2,14,26,0,26,20,2,0,26,0,3,15,26, 
0,13,10,0,26,13 


[ 347 ] 

[1063] 

[929 ] 

[897 ] 

[996] 

[1443] 

[9033] 


[940] 

[3308] 

[1169] 

[845] 

[3308] 

[2028] 

[1047] 

[7097] 


[4081] 

[2417] 

[1573] 

[8076] 


[1335] 
[1573] 
[1371] 
[730] 
[9588] 


[2442 ] 

[2151] 

[16281] 


[733] 

[1391] 

[3542] 

[12386] 


[5172] 

[1897] 

[1435] 

[10753] 


[2016] 

[4093] 

[4134] 

[4476] 

[11623] 


[3555] 

[6256] 

[7338] 


1740 DATA 218,41,29,42,35,41,38,42.5,42.3, 

46.37.48.39.46.5.35.46.37.44.3.34.45.5.32, 

46.2.33.5.47.31.42.5.27.41.29.40.8.23.38.2 
4,36.5,22.8,40.5,19.5,42,19.5,45.7,13.7,45 
.5,12.3,44.4,12.3,43.6,13.6,42.5,14.1,40,1 
8.5,40.5,17,39.7 

1750 DATA 16.5,39,17.2,38,15.6,38,12.5,36. 
6,15,38.9,16.1,40,15.7,41.3,13,43,10.5,44. 
3,8.9,43.2,6.2,43.5,4,42.7,3,41.8,3.3,39.5 
,-.4,38.7,.3,36.6,-2.1,36.5,-4.8,36,-5.4,3 
7.1,-6.7,37,-8.8,38.6,-8.8,38.6,-9.4,41.2, 
- 8 . 6 ,4 3.1,-9.3,43.7,-7.7,43.3,-1.5 
1760 DATA 46.1,-1.2,47.3,-2.5,48,-4.7,48.6 
,-4.7,48.8,-3.1,48.7,-1.7,49.8,-2,49.8,-1. 

3.49.4, -1.1,49.3,-.1,49.7,.2,50.2,1.5,50.9 
,1.6,51.4,3.6,53.3,4.7,54,8.3,57,8.1,57.6, 

10.7.56.4.11.9.54.5.10.54.14.2 

1770 DATA 55,20,59,22,60,30,60.6,28,60,22, 
63,21,65.6,26,66,22,61,17,60,19,56,16,55.4 
,13,59,10.3,58,7.6,58.5,6,62.5,5.5,64,10,7 
0.3,19,71.2,27,67.8,41.5,66.5,39,67.2,33,6 
4.5,35,64,40,68.2,44,69,67,72,70,77,112,74 
,110,72,130,70 

1780 DATA 175,67,190,66,177,63,180,60,170, 
60,163,55,162,51,157,57,156,62,163,62,157, 
59,153,59,143,55,135,54,141,48,140,39,128, 
35,129.5,34,126,39,125.5,41,121,38.5,118,3 
0,122,23,117,21,110,22,108,19,105.5,14.5,1 
09,11.5,109,8 

1790 DATA 105,13,100.5,9,99,5,103.5,1,104, 
4,101,9,98,17,97,23,92,15,80,10,80,8,77,12 
,74.5,21,72,25,67,25,56,30,50,29.5,49,24,5 
3,25,56,24,56,23,60,17,56,12.5,44,28,35,28 
,33,15,40,10.5,45,12,51.4,4,47.7,-5,39,-16 
,41,-20,35,-25,35,-26 

1800 DATA 33,-29,32,-34,26,-35,20,-18,12,- 
11,14,-1,9,3,10,4.6,8.4,4.3,5.9,6.5,4.3,4. 

8 , -2,4.6,-7.7,7.8,-12.9,9.6,-13.4,12.4,-16 
.7,14.9,-17.6,17.2,-16.1,21.3,-17.2,28,-12 
.9,30.3,-9.5,31,-9.8,32,-9.8,33.3,-8.3 
1810 DATA 33.9,-6.9,35.8,-6,35.9,-5.4,35.2 
,-4.7,35,-2,36.4,1,37.3,10.2,36.7,10.4,37, 

11.36.1.10.5.35.2.11.1.34.10.32.8.12.5.32. 
94,13.2,32.4,15.3,31.5,15.6,30,19,31,20,32 
,19.7,33,22,31,29,31.6,31,31.2,33.5,37,36, 
37,28,40,26,41,29 

1820 DATA 19,58.5,-5,58.2,-1.8,56,-3.3,56, 
-2,53,.5,53,1.6,52.2,1.7,51.3,.8,51.3,1.5, 
50.9,1,50,-5.8,51.4,-3.7,51.7,-5,53.3,-4.5 
,53.3,-3,55,-3.5,54.7,-5,57.5,-6.5,58.5,-5 
,5,55.3,-6.5,54.3,-10,51.4,-10,52.2,-6.3,5 
5 . 3 ,- 6 . 5 

1830 DATA 7,66.5,-22.5,65.4,-24.5,66.6,-16 
,65,-13.5,63,-19,64,-22,66.5,-22.5,10,43,9 
.4,42.4,8.5,41.5,8.8,40.9,9.8,39.1,9.7,38. 

9.8.4.40.8.8.4.41.3.9.2.42.1.9.6.43.9.4.6, 
-13,49,-17,44,-25,44,-25,47,-15,50.5,-13,4 
9 

1840 DATA 12,60,-44,65,-40,70,-22,82,-15,8 

3.6, -30,78.5,-73,76,-68,75.6,-59,70,-51,66 
,-53.5,61,-48,60,-44,84,63,-77,52,-56,50,- 
65,46,-64,43.7,-70.4,41.5,-70.7,40.6,-74,3 
7,-76,35.2,-75.7,31,-81.6,27,-80,25,-80.5, 
28,‘-82.7,29,-82.5,30,-84,30.3,-89,29 

1850 DATA -90,29.7,-94,27,-97.5,22,-97.7,1 

9, -96,18.4,-94,19,-91,21,-90,21.6,-87,16,- 

89.15.6, -83,10.5,-83.5,9,-81.5,9.7,-79,8,- 
77,11,-75,12,-71,10.6,-63,4,-52,0,-50,-6,- 
34,-12,-39,-22,-41,-25,-48,-28,-48,-41,-63 
,-51,-69,-55,-65 

1860 DATA -55,-70,-50,-76,-37,-74,-18,-70, 
-6,-81,0,-81,6.6,-77.5,9,-79,7,-81,9.5,-85 
,13,-88,14,-91.5,16.2,-95;15.7,-96.6,19.6, 
-106,22,-105.7,29,-112.4,31.3,-113,31.6,-1 
15,30,-114.6,23,-109.5,25,-112.3,30,-115.9 
,34,-118.5 

1870 DATA 34.5,-120.7,39,-124,43,-124.5,48 
.5,-124.5,59,-138,61,-148,54,-165,59,-158, 
62,-166,68,-167,71,-157,68,-110,70,-82,60, 
-95,54,-80,63,-77,32,-10.5,142.4,-17.5,141 
,-15,135.5,-12,137,-11,132,-15,129,-14,127 
, -20 

1880 DATA 120,-20,114,-26,113,-32,116,-34. 
5,115,-35.2,118,-31.5,130,-32.5,133.5,-35, 
135.5,-33,137.8,-35.2,137.5,-38,140.4,-39, 

143.4, -37.8,145,-39.2,146,-37.5,150,-34,15 
1,-32.7,152.7,-29,153.6,-25.6,153,-20,148. 

4, -18.8,146.3,-14.5,144.7,-14.7,144,-10.5 
1890 DATA 142.4,29,-63,-56,-64,-60,-66,-65 
,-73,-75,-73,-85,-73,-100,-75,-100,-73,-12 

5, -75,-137,-78,-165,-77.6,164,-72,170,-68, 
155,-66,135,-66,115,-66,90,-69.5,75,-68,70 


[10562] 


[9602] 


[10683] 


[10359] 


[10377] 


[11676] 


[8223] 


[9771] 


[9924] 


[9357] 


[11921] 


[9416] 


[9892] 


[10258] 


[12452] 


[13289] 
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,-66,55,-69,40,-70,20,-70,0,-71,-10,-74,-2 
0,-78,-35,-75,-60,-67,-61,-64.3,-59,-63,-5 
5 

1900 DATA 7,9.7,80,7,82,6.5,81.8,6.3,80.5, 

6.4,80,8,79.7,9.7,80,22,45.5,141.8,43.3,14 

5.7,42,143,42.6,141.6,40.6,140,38.2,139.6, 

37,136.9,35.6,135.7,35.6,133,34,130.9,32.9 

,132,31.4,131.3,31.2,130.2,33.3,129.7,34,1 

30.9,34.5,135,33.5,135.7,36,140.6,39.8,142 

1910 DATA 42.5,139.7,43.5,141.4,45.5,141.8 

,11,6,95,1.7,98.8,-3.2,101.6,-5.9,105.7,-6 

.6,114.2,-8.6,114.5,-7.1,105.6,-2.9,105.9, 

.4,103.6,5,97.5,6,95,6,1.9,109.3,7,116.9,5 

,119.3,-4,116,-2.9,110.3,1.9,109.3,11,0,13 

0,-2.5,141,-6.5,148,-6.8,146.8,-10.7,151 

1920 DATA -7.7,144.3,-9.3,143,-8,138.4,-5. 

4,138.1,-4,133.1,0,130,14,-34.5,172.7,-36. 

7,175.9,-37.5,176,-38,177.3,-37.4,178.5,-4 

1.6,175.5,-40.6,172.5,-42.8,171,-46,166.2, 

-46.7,169.2,-40.2,175.3,-39.3,174,-37.7,17 

4.8,-34.5,172.7,0,0,0 

1930 x%=0 

1940 ISTATE,@e%,@sh%,@fr%:IF e%=l THEN e%= 
0:RETURN 

1950 IF e% = 0 THEN RESTORE 2430 ELSE RESTOR 
E 2420 

1960 GOSUB 2240:CALL &BB18:|GET:X%=X%+1:IF 
X%=2 THEN e%=l:RETURN ELSE 1940 
1970 X%=0 

1980 GOSUB 1940:IF e% = l THEN RETURN 
1990 IF fr%<ma%THEN RESTORE 2450 ELSE IF s 
h%=l THEN RESTORE 2440 ELSE e%=0:RETURN 
2000 GOSUB 2240:CALL &BB18:IGET:x%=x%+l:IF 
x%=2 THEN e%=l:RETURN ELSE 1980 
2010 w.i$=UPPER$(CHR$(ac) )+SPACE$(10):ma%=l 
:|GET:GOSUB 1970:IF e%=l THEN RETURN 
2020 I CAT, @x% : IF x%=0 THEN e% = l -.RETURN 
2030 |FIND,@x%,@wi$:IF x%=0 THfeN e%=l ELSE 
e%=0 

2040 RETURN 
2050 GOTO 2120 

2060 i$=UPPER$(INKEY$):IF i$=""THEN 2060 
2070 IF i$=CHR$(13)THEN RETURN 
2080 IF i$-"."THEN WHILE LEN(h$) <8:h$=h$ + " 
":WEND:h$=h$+".":GOTO 2120 
2090 IF i$=CHR$(127)THEN IF h$=""THEN 2060 
ELSE h$=LEFT$(h$,LEN(h$)-1):GOTO 2120 
2100 IF INSTR{ac$,i$)=0 THEN 2060 
2110 IF LEN(hS)=8 THEN h$=h$+"."+i$ELSE IF 
LEN(h$)<12 THEN h$=h$+i$ELSE 2060 
2120 wi$=h$+"_": |CLG,240,xl,x2,yl,yl: | TEXT 
,2,0,0,x,X,y,0,@Wi$:GOTO 2060 
2130 GOTO 2190 

2140 i$=INKEY$:IF i$ = ""THEN 2140 
2150 IF i$=CHR$(13)THEN RETURN 
2160 IF i$=CHR$(127)THEN IF h$=""THEN 2140 
ELSE h$=LEFT$(h$,LEN(h$)-1):GOTO 2190 
2170 IF i$<" "OR i$>CHR$(126)THEN 2140 
2180 IF LEN(h$)<1 THEN h$=h$+i$ 

2190 wi$=h$+" " : I OLG, 240 ,xl ,x2 ,yl ,yl: | TEXT 

,2,0,0,100,556,y,l,§wi$:GOTO 2140 

2200 |GET:RESTORE 2500:GOSUB 2240:h$="":|B 

OX,228,400,154,180:ac$=d$:xl=31:x2=48:yl=l 

5:x=244:y=174:GOSUB 2050:IGET:RETURN 

2210 Xl=18:x2=62:yl=8:y=286:GOSUB 2130:RET 

URN 

2220 xl=5:x2=65:yl=8:y=286:GOSUB 2130:RETU 
RN 

2 230 I TEXT,2,0,0,l,r,y,l,@a$:y=y-32:RETURN 
2240 READ 1,r,o,u:|STORE,1,r,o,u:|RAHMEN,1 
,r,o+3,u:l=(l-l)*8:r=r*8:READ h$:ym=404-o* 
16:FOR y=ym-2 TO ym+2 STEP 2:|TEXT,2,1,1,1 
,r,y,1,0 h$:NEXT:I TEXT,3,0,l,1,r,ym,l,@ h $:R 
EAD an:FOR t=l TO an:READ 1,r,y,t$:|TEXT,3 
,0,0,1,r,y,1,@t$:NEXT:RETURN 
2250 I BUTTON:READ an:FOR t=l TO an:READ 1, 
r,o,hS:IF h$="q"THEN h$="Hauptmen}" 

2260 BUTTON,@h$,X,r,o,o-12:NEXT:RETURN 
2270 DATA 20,60,3,21,"Informationen",7,152 
,480,308,"Alpha:",152,480,278,"Beta:",152, 
480,244,"Delta:",152,480,212,"Gitter:",152 
,480,180,"Schrittweite:",152,480,148,"Tran 
sparent:",152,480,116,"Ort:" 

2280 DATA 20,60,3,17,"N/S Breite",0 
2290 DATA 5,27,30,120," + 1",34,38,120," + 10" 
,42,46,120,"-10",50,53,120,"-1",24,56,96," 
OK" 

2300 DATA 20,60,3,17,"Beta",0 
2310 DATA 20,60,3,17,"W/0 L{nge\0 
2320 DATA 20,60,5,18,"Transparent",0 
2330 DATA 3,30,50,130,"nicht Transp.",30,5 
0,114,"Transparent",30,50,90,"q" 


[11577] 
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2340 DATA 20,60,3,17,"Gitter",0 [2037] 

2350 DATA 5,30,50,146,"kein Gitter",30,50, [6474] 
130,"Gitter mit:",36,3 9,110,"1", 41,44,110 
,"—1",30,50,90,"q" 

2360 DATA 20,60,4,21,"Schrittweite",0:DATA [5810] 
5,36,39,118," + 1", 41,44,118,"-1",30,50,98, 

"q",34,50,74,"Normal",34,50,58,"Turbo" 

2370 DATA 20,60,3,22,"Monitor",0:DATA 7,30 [15368] 
,54,46,"q",30,54,146,"Gr}nmonitor I", 30,54 
,130,"Gr}nmonitor II",30,54,114,"Farbmonit 
or: Blau I",30,54,98,"Farbmonitor: Blau II 
",30,54,82,"Farbmonitor: Rot",30,54,66,"Fa 
rbmonitor: Grau" 

2380 DATA 9,71,3,21,"Diskette",0,10,12,38, [14234] 
146,"Bild(17K) laden",42,68,146,"Bild(17K) 
speichern",12,38,128,"Globus(11K) laden", 
42,68,128."Globus(11K) speichern",12,38,11 
0,"File 1 sehen",42,68,110,"File umbenenne 
n" 

2390 DATA 17,38,90,"Laufwerk A:", 17,38,74, [3960] 
"Laufwerk B:",42,68,90,"Katalog",30,50,54, 

" q " " 

2400 DATA 11,69,4,22,"Hardcopy",0:DATA 13, [14722] 
15,30,142,"Din A 6",33,47,142,"Din A 5",50 
,65,142,"Din A 4",15,30,122,"Din A 3",33,4 
7,122,"Din A 2",50,65,122,"Din A 1",22,40, 

98,"Entzerrt",22,40,82,"nicht Entzerrt",45 
,58,100,"Paper:",45,58,82,"R}cken:" 

2410 DATA 45,58,64,"Gitter:",45,58,46,"L{n [1795] 
der:",22,40,46,"q"" 

2420 DATA 20,60,8,16,"Achtung",2,160,480,2 [6321] 
14,"Die eingelegte Diskette",160,480,182, " 
ist nicht formatiert!" 

2430 DATA 20,60,8,16,"Achtung",2,160,480,2 [7085] 
14,"Sie haben vergessen,",160,480,182,"ein 
e Diskette einzulegen!" 

2440 DATA 20,60,8,16,"Achtung",2,160,480,2 [6571] 
14,"Sie haben vergessen,", 160,480,182,"den 
Schreibschutz zu Iffnen!" 

2450 DATA 20,60,8,16,"Achtung",2,160,480,2 [7616] 
14,"Auf ihrer Diskette ist",160,480,182,"n 
icht genug Platz!" 

2460 DATA 24,56,1,25,"Katalog",0 [1374] 

2470 DATA 4,28,34,16,"*",46,52,16,";",28,5 [4203] 
2,30,"Anfangsbuchstabe",37,43,16,"ENDE" 

2480 DATA 20,60,6,16," L|sehen",2,160,480, [6360] 
250,"Soll",160,480,206,"gel|seht werden ?" 

,2,30,38,90,"JA",42,50,90,"NEIN" 

2490 DATA 20,60,6,16," Umbenennen", 2,160,4 [7241] 
70,250,"Geben Sie den neuen Namen f}r",160 
,480,206,"ein 1" 

2500 DATA 20,60,6,16," Speichern",1,160,47 [4319] 
0,228,"Geben Sie den Namen ein !" 

2510 DATA 15,65,2,22,"Ortsverzeichnis",0:D [13969] 
ATA 6,24,56,156,"Ort anw{hlen",24,56,136 , " 

Ort zufjgen",24,56,116,"Ort {ndern",24,56, 

96,"Ort 11 sehen",24,56,76,"Liste ausdrucke 
n",24,56,52,"q" 

2520 DATA 15,65,2,10,"Ort ZUf}gen",1,100,5 [3749] 
40,320,"Ortsname :" 

2530 DATA 3,77,2,11,"Ort zuf}gen",1,100,54 [3853] 

0,320,"Bemerkungen:" 

2540 DATA 24,56,1,25,"ausw{hlen",0 [2145] 


1 >************************************ [1383] 

2 '* DIGWIN2.BAS * [698] 

3 '* nur CPC 6128 * [508] 

4 '* (c)1992 Ronald Heitmann * [1000] 

5 >************************************ [1383] 

10 MEMORY &92FF [758] 

20 FOR adr = &9 300 TO &9CD3:READ a$:POKE adr [2325] 
,VAL("&"+a$):NEXT 

30 SAVE"di.gwin2 .bin",b,&9300, &CD4 : END [2250] 

40 DATA 21,83,93,01,09,93,C3,Dl,BC,38,93 [1714] 

50 DATA C3,87,93,C3,BE,93,C3,2A,95,C3,E7 [1650] 

60 DATA 95,C3,3C,99,C3,59,9A,C3,6C,9A,C3 [910] 

70 DATA B2,9A,C3,C7,9A,C3,CC,9A,C3,04,9B [2569] 

80 DATA C3,96,95,C3,B4,9B,C3,DC,9B,C3,55 [2239] 

90 DATA 9C,49,43,4F,4E,03,54,45,58,D4,47 [1453] 

100 DATA 45,4E,50,4F,49,4E,D4,50,4F,49,4E [1613] 

110 DATA 54,45,D2,42,55,54,54,4F,CE,53,54 [1336] 

120 DATA 4F,52,C5,52,41,48,40,45,CE,47,45 [1707] 

130 DATA D4,49,4E,56,45,52,D4,43,4C,C7,42 [1164] 

140 DATA 4F,D8,53,45,45,CB,53,57,49,54,43 [2220] 

150 DATA C8,53,57,2E,4F,CE,41,54,CD,00,00 [1863] 

160 DATA 0D,00,34,11,1B,CA,21,00,80,0E,03 [1705] 

170 DATA 06,04,C5,D5,C5,06,10,C5,D5,01,04 [1568] 

180 DATA 00,ED,B0,Dl,EB,CD,8D,97,EB,CI,10 [2352] 

190 DATA F0,EB,06,0C,CD,8D,97,10,FB,EB,CI [3501] 
200 DATA 10,El,D1,EB,01,07,00,09,EB,CI,0D [27661 
210 DATA 20,D2,C9,DD,7E,0A,B7,28,14,3E,AF [2425] 
220 DATA 32,C4,94,3E,29,32,3F,94,32,99,94 [2027] 
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230 DATA 3E,02,32,A9 ,94, 18,00,32,04, 94, 32 [1478] 

240 DATA 3F,94,32,99,94,3C,32,A9,94, DD,7E [1814] 
250 DATA OE,CD,2C,BC,32,BA,94,32,CC,94,DD [1993] 
260 DATA 7E,0C,B7,28,12,3E,AF , 32, Bl,94, 3E [1966] 
270 DATA 1B, 32, 7F,94, 32,80, 94, 32, 81,94, 18 [2936] 

280 DATA OE, 32, 7F, 94, 32,80,94,32,81, 94,3E [2075] 
290 DATA B7,32,B1,94,EB,7E,32,23,95,23,7E [1578] 

300 DATA 5F,23,7E,57,ED,53,26,95,21,00,00 [1970] 

310 DATA 22,24,95,3A,23,95,47,1A,C5,D5,CD [1928] 

320 DATA 18, 95,CD, FA,94,ED,53,24,95,26,00 [2587] 

330 DATA 00, 19,22,24, 95,Dl,CI,13,10,E7,DD [2040] 
340 DATA 66,07,DD,6E, 06, DD, 56,09,DD, 5E,08 [1588] 

350 DATA D5 , ED,52,CB , 3C, CB, ID,ED,5B ,24, 95 [1011] 

360 DATA 1B, ED, 52, EB,El,DD,7E, 02 ,B7,28 , 05 [1579] 

370 DATA 19, 3D, 28, 01,19,EB ,CB, 3A, CB, 1B,DD [1671] 
380 DATA 66,05, DD,6E,04 ,CB, 3C,CB,1D,00,00 [1318] 

390 DATA 00 , CD ,1 D , BC,22,28, 95, 3A, 23,95, 47 [1826] 

400 DATA 2A,26,95,E5,C5,7E, CD , 18,95 , E5 ,CD [1388] 
410 DATA FA, 94, 00,22, 24,95,El, ED,5B,28,95 [2136] 

420 DATA EB ,E5,06,08, D5,C5,06,00,C5,E5,D5 [538] 
430 DATA 1A,06,07, 57, 00, CC, 10,95,CB,02,30 [1328] 

440 DATA 06,3E,00,AE,Al , AE, 77, CB,09, DC,89 [1690] 

450 DATA 97, 00,20, OF, CB, 42, 28,06,3E,00,AE [2082] 
460 DATA Al,AE, 77,CB, 09,DC, 89, 97,10, DD,Dl [2143] 
470 DATA El,CI,CD,8D,97,10,CA, CI, Dl,13,10 [2785] 

480 DATA CI, El, CI, 3A,24, 95,CB, 09, DC,89,97 [1458] 

490 DATA 3D,20,F8,22,28,95,E1,23,10,96,C9 [2374] 

500 DATA 06,08 ,AF,22, 00 , AF,B6,23,10, FC, B7 [1750] 
510 DATA 2E,04,C8,2E,09,CB,3F,D8,2D,18,FA [1406] 

520 DATA CB,3A,B2, CB,3A, B2, 57,G9,26,00,6F [2391] 
530 DATA 29,29,29,7C,C6, 8F ,67,C9,00,00,00 [1013] 

540 DATA 00,00,00,00,21,DF,97,54,5D, 01, AO [1650] 
550 DATA 00, 13, 36, 00, ED, BO, 21,DF,97,11,82 [2092] 

560 DATA 95, OE,88, CD,57,95,11,82,95,OE, 44 [1323] 

570 DATA CD, 57, 95,11 ,82,95,OE,22,CD, 57,95 [1717] 

580 DATA 11,82 ,95, ÖE,11 , 06 ,0A,C5,E5, 1Ä,13 [965] 

590 DATA CD ,6E,95,1A,13,CD,6E,95,E1,01,04 [2013] 

600 DATA 00, 09, CI, 10, EC,C9,06,08, C5, 07,30 [2215] 

610 DATA 05, 47,7E,Bl,77,78,CI, CB, 09,DC,89 [2518] 

620 DATA 97,10,EF,C9,CO,00,FO,00,7C,00,7F [1614] 

630 DATA 00 ,3 F , CO,3E,00 , 1F , 0 6, 1B,80 , 0 9, CO [1696] 
640 DATA 08,80,CD ,9F, 95,CD,18,BB,C3,38,97 [1990] 

650 DATA CD,C6 , BB, CB,3C,CB, ID,CB,3A,CB, 1B [1751] 
660 DATA 22 , B3 , 97 , ED , 53,B5,97, AF, 32 , E5,98 [1794] 

670 DATA 7B,E6,03,32,B1,97,D5,E5,11,28,00 [1360] 

680 DATA 3C, 21, B7, 97, 47, 19,10,FD, 22, AD,97 [1853] 

690 DATA El , Dl, CD,ID, BC,22,AF ,97,79, 32,B2 [1493] 
700 DATA 97,AF,32,FD,95,3E,02, 32, 12, 96, CD [1442] 
710 DATA 54,97, CD, El, 98,C9, CD,9F, 95, CD, 00 [996] 

720 DATA 97, C2 , FB ,95, 3E,02, 32, 12, 96,AF, 32 [1590] 

730 DATA FD, 95,18,EF,4F,3E, 00,FE,18,20,OF [2176] 
740 DATA 3A, 12,96,FE, 03,28, 08, 3C, 32, 12,96 [1741] 

750 DATA AF ,32, FD,95,06,00,3A,FD,95, 3C, 32 [1836] 

760 DATA FD, 95, CD,19 , BD, F3,CD, 38, 97, C5,CB [1816] 
770 DATA 19, DC ,66,96, CB ,19, DC ,7A, 96,CB,1 9 [1474] 

780 DATA DC,8E,96,CB,19,DC,C5,96,CB,19,DA [935] 

790 DATA 47,96, CD, 54, 97,CI, 10,DD,CD, El,98 [2518] 

800 DATA C3, EA,95, CI,CD , 09,BB,38,FB,3A,E5 [2034] 
810 DATA 98,CD, FC, 98 ,2A,B3,97, ED,5B,B5 , 97 [2220] 

820 DATA CB, 25,CB, 14,CB, 23,CB,12,FB,C3,CO [2050] 
830 DATA BB,3A, B3, 97 , FE,C7 , C8 ,3C,32 ,B3,97 [1319] 

840 DATA 2A, AF , 97 , CD , 9C, 97, 22 , AE’, 97 , C9, 3A [1578] 
850 DATA B3 , 97,FE,09 ,C8, 3D,32,B3, 97, 2A, AF [1574] 
860 DATA 97,CD,8D,97,22 , AF ,97,C9,2A, B5,97 [1884] 

870 DATA 7C ,B5, C8 , 2B ,22, B5 ,97,2A, AF,97,3A [1877] 
880 DATA B2,97,07,32,B2,97,DC,8B , 97 , 22,AF [2265] 
890 DATA 97, 11, D8 , FF, 2A, AD,97, 19, 22, AD, 97 [1469] 

900 DATA 3A, Bl,97,3D,E6,03,32,B1,97,FE,03 [1940] 

910 DATA CO,21, 57,98,22, AD,97,C9,2A,B5,97 [1213] 

920 DATA 7C , B7,CA,Dl,96,7D,FE,35,C8,23,22 [1960] 

930 DATA B5 ,97, 2A,AF,97,3A,B2,97,0F,32,B2 [1518] 

940 DATA 97,DC, 89,97,22,AF,97,11,28, 00, 2A [2579] 
950 DATA AD,97,19,22,AD,97 , 3A, Bl,97, 3C,E6 [1566] 
960 DATA 03,32,Bl,97, CO, 21,DF,97,22,AD, 97 [1651] 

970 DATA C9,06,00,3E,00,CD,1E,BB,28,02,CB [1841] 
980 DATA C0,3E,02,CD,1E,BB,28,02,CB,C8, 3E [1317] 
990 DATA 08 , CD,1E,BB,28,02,CB,D0,3E,01,CD [1003] 

1000 DATA IE, BB,28,02, CB, D8,78,B7,20,09,3E [1696] 
1010 DATA 09, CD, IE, BB ,28,02,CB , EO,CD,24, BB [1467] 
1020 DATA BO, C9, C5,06,OA,21,B7 , 97,ED,5B,AF [1853] 
1030 DATA 97,78,01, 04, 00,D5, ED, BO,Dl, 47,EB [1503] 
1040 DATA CD,8D, 97, EB , 10,FO,C1 , C9, 2A, AD, 97 [1419] 
1050 DATA 3E,0A,32 ,80, 97,01,B7 ,97, ED,5B,AF [1501] 
1060 DATA 97,D5,3E,04,32,71,97,1A,02,03,B6 [1139] 
1070 DATA 12,23,13,3E,00,3D,32,71,97,C2,69 [1737] 
1080 DATA 97, Dl ,EB, CD,8D,97 ,EB ,3E,00,3D,32 [1587] 
1090 DATA 80,97,C2,63,97,C9,23,C9,2B,C9,7C [2763] 
1100 DATA C6,08,67,D0,D6,40,67,7D,C6,50,6F [1622] 
1110 DATA DO,24,C9,7C,D6,08,67,FE,C0,D0,C6 [1582] 
1120 DATA 40, 67,7D , D6 , 50 , 6F,DO , 25,C9 , 00 ,00 [2058] 
1130 DATA 00,00, 00, 00,00, 00, 00,00,FC, 28,OD [1414] 
1140 DATA 00,00,F0,F6,16,29,FC,20,0D,00,00 [1055] 


1150 DATA 72,E7,01,C9,00,07,00,EA,88,01,CO [1267] 
1160 DATA 00,07,00,F4,88,01,CO,00,07,00,FE [1452] 
1170 DATA 88,01,CO,00,26,00,08,89,Al,20,FF [1005] 
1180 DATA 01,28,03,00,00,El,29,Fl,19,41,20 [2390] 
1190 DATA FC,20,FF,01,28,03,00,00,El,29,EE [1710] 
1200 DATA 19,5A,20,EB,20,1E,4E,89,00,14,00 [1282] 
1210 DATA 12,89,03,00,00,El,EF,FF,75,28,03 [1908] 
1220 DATA 00,00,El,2C,14,29,00,4E,00,IC,89 [1632] 
1230 DATA 83,20,OD,00,00,63,61,64,F2,2C,40 [538] 
1240 DATA 03,00,00,6C,F4,28,0E,29,2C,40,03 [1842] 
1250 DATA 00,00,E1,2C,40,OD,00,00,EA,2C,OD [1610] 
1260 DATA 00,00,6C,74,FO,01,A1,20,OD,00,00 [2218] 
1270 DATA EA,FO,OE,20,EB,20,OD,00,00,F7,EF [2010 
1280 DATA 0D,Ö0,00,77,6C,F4,28,0D,00,00,EA [921] 
1290 DATA 29,01,AO,20,IE,62,89,00,IC,00,26 [2024] 
1300 DATA 89,9F,20,IE,BC,89,01,Al,20,OD,00 [1792] 
1310 DATA 00,72,E6,EF,OE,20,EB,20,9F,20,1E [1597] 
1320 DATA OC,8A,00,18,2A,BS,97,CB,3C,CB,ID [2084] 
1330 DATA CB,3D,7D,3C,32,EF,99,3A,B3,97,32 [2180] 
1340 DATA FO,99,AF,32,Fl,99,3A,F2,99,B7,28 [1955] 
1350 DATA 3A,47,FD,21,F5,99,FD,E5,3A,EF,99 [2252 
1360 DATA FD,BE,00,38,1E,3D,FD,BE,01,30,18 [2088] 
1370 DATA 3A,FO,99,FD,BE,03,38,10,3D,FD,BE [2063] 
1380 DATA 02,30,OA,3A,F1,99,3C,32,00,00,FD [2352] 
1390 DATA El,C9,FD,El,11,07,00,FD,19,21,Fl [1256] 
1400 DATA 99,34,10,CB,AF,32,00,00,C9,CD,84 [1282] 
1410 DATA 98,FE,00,C8,F5, CD, 38., 9 7,3A, E5,98 [2262] 
1420 DATA CD,FC,98,Fl,32,E5,98,CD,FC,98,CD [1613] 
1430 DATA 54,97,C9,B7,C8,3D,47,87,80,87,80 [1340] 
1440 DATA 21,F5,99,06,00,4F,09,7E,ED,44,23 [1974] 
1450 DATA 86,3C,87,87,06,FB,80,F5,23,7E,23 [1967] 
1460 DATA 96,3D,3D,3D,47,23,5E,23,56,23,4E [966] 
1470 DATA EB,Dl,E5,C5,42,7E,A9,77,CB,09,DC [2230] 
1480 DATA 89,97,10,F6,CI,El,CD,8D,97,10,EC [976] 
1490 DATA C9,FE,05,20,06,AF,32,B8,99,18,14 [1947] 
1500 DATA 47,3E,C9,32,B8,99,78,B7,20,0A,32 [1982] 
1510 DATA F2,99,21,F5,99,22,F3,99,C9,3A,F2 [1097] 
1520 DATA 99,FE,OE,C 8 ,2A,F3,99,DD,7E, 06,77 [732 ] 
1530 DATA 23,DD,7E,04,77,23,DD,7E, 02,77 ,E5 [2548] 
1540 DATA 26,00,6F,29,22,BO,9B,El,23,7B,77 [1401] 
1550 DATA 23,22,F3,99,26,00,6F,29,22,B2,9B [1163] 
1560 DATA 21,F2,99,34 ,CD, 7:6,9B,CD, 9A, 9A, 2A 1601] 
1570 DATA BO,9B,CB,3C,CB,ID,2B,2B,ED,5B,AC [1057] 
1580 DATA 9B,CB,3A,CB,1B,13,13,CD,ID,BC,EB [1362] 
1590 DATA 2A,F3,99,73,23,72,23,71,23,22,F3 [2304] 
1600 DATA 99,CD,23,9B,00,3E,02,32,4E,00,AF [1575] 
1610 DATA 32,4C,00,32,4A,00,2A,AC,9B,22,48 [1774] 
1620 DATA 00,2A,AE,9B,23,23,22,46,00,2A,BO [1352] 
1630 DATA 9B,01,FA,FF,09,22,44,00,3E,01,32 [1910] 
1640 DATA 42,00,DD,56,09,DD,5E,08,DD,21,40 [1624] 
1650 DATA 00,C3,BE,93,00,00,00,00,00,00,76 [1174] 
1660 DATA 89,01,CO,00,07,00,80,89,01,CO,00 [1644] 
1670 DATA 26,00,8A,89,9F,20,IE,08,89,01,Al [2266] 
1680 DATA 20,OD,00,00,FO,28,OD,00,00,6C,E2 [1083] 
1690 DATA 29,FB,20,19,FF,20,EB,20,0D,00,00 [1891] 
1700 DATA 65,F2,EF,14,00,14,00,94,89,0D,00 [1564] 
1710 DATA 00,6C,E2,EF,ÖD,00,00,6C,E2,F5,OF [2091] 
1720 DATA 01,C9,00,07,00,9E,89,01,CO,00,07 [1657] 
1730 DATA 00,A8,89,01,CO,00,07,00,B2,89,01 [1539 
1740 DATA CO,00,40,00,BC,89,0D,00,00,72,E6 [1968] 
1750 DATA CD,76,9B,22,00,65,ED,53,02,65,21 [1752] 
1760 DATA F6,9A,11,04,65,CD,D5,9A,CD,76,9B [1301] 
1770 DATA E5,CD,9A,9A,6B,26,00,29,29,29,29 [1313] 
1780 DATA 01,72,FE,09,CD,A4,9B,23,23,23,23 [1744] 
1790 DATA 22,B2,9B,E1,26,00,2D,29,29,29,29 [1361] 
1800 DATA 09 , CD, A4,9B,2 2.,B0,9B,C3,23,9B, 6 C [1813] 
1810 DATA 26,00,2D,29,29,29,22,AC,9B,6A,26 [2149] 
1820 DATA 00,29,29,29,2B,2B,2B,2B,22,AE,9B [1358] 
1830 DATA C9,21,FD,9A,22,E3,9A,2A,00,65,ED [1991] 
1840 DATA 5B,02,65,CD,83,9B,11,04,65,18,19 [2485] 
1850 DATA 21,Fl,9A,18,09,21,01,9B,DD,7E,08 [2331] 
1860 DATA 32,02,9B,22,E3,9A,D5,CD,76,9B,CD [2489] 
1870 DATA 83,9B,D1,C5,E5,CD,00,00,23,10,FA [2109] 
1880 DATA El,CI,CD, 8 D,97,0D,20,F0,C9,7E,EE [2688] 
1890 DATA OF,77,C9,7E,12,13,3E,F0,77,C9,1A [1717] 
1900 DATA 77,13,C9,36,00,C9,EB,22,BO,9B,DD [1414] 
1910 DATA 66,03,DD,6E,02,22,B2,9B,DD,66,05 [2024] 
1920 DATA DD,6E,04,22,AE,9B,DD,66,07,DD,6E [976] 
1930 DATA 06,22,AC,9B,3E,02,CD,DE,BB,ED,5B [2039] 
1940 DATA AC,9B,2A,B2,9B,E5,D5,E5,CD,CO,BB [1604] 
1950 DATA El,ED,5B,AE,9B,D5,CD,F 6 ,BB,Dl, 2A [2249] 
1960 DATA BO,9B,E5,CD,F 6 ,BB,El,Dl,D5,CD,F 6 [2043] 
1970 DATA BB,Dl,El,E5,D5,CD,F6,BB,3E,03,CD [1019] 
1980 DATA DE,BB,D1,E1,2B,2B,13,13,E5,CD,C0 [1719] 
1990 DATA BB,El,ED,5B,AE,9B,13,13,D5,CD,F6 [1626] 
2000 DATA BB,Dl,2A,BO,9B,2B,2B,C3,F 6 ,BB,DD [1778] 
2010 DATA 6E,02,DD,5E,00,DD,56,04,DD,66,06 [1907] 
2020 DATA C9,25,2D,7A,94,47,7B,95,4F,CB,21 [1619] 
2030 DATA CB,21,CB,21,7C,26,00,54,5D,29,29 [1569] 
2040 DATA 19,29,29,29,29,5F,19,7C,C6,CO,67 [1964] 
2050 DATA C9,7C,2F,67,7D,2F,6F,23,C9,00,00 [2569] 
2060 DATA 00,00,00,00,00,00,B7,20,OA,32,73 [1908] 
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2070 

2080 

2090 

2100 

2110 

2120 

2130 

2140 

2150 

2160 

2170 

2180 

2190 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2270 

2280 

2290 

2300 

2310 

2320 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


9C, 21 
FE,08 
7E, 02 
9C,C9 
CD, F6 
23, FD 
DD, BE 
18,03 
54,5D 
00,16 
E5,C5 
9C,C1 
88,08 
Al ,AE 
13,C9 
00,32 

OB, 9C 
00,70 
03,00 
10,10 
04,20 
03,80 
E4,4F 

OC, 60 
88,23 
23,88 


,74,9C, 
,C8,3C, 
,3D,77, 
,FD,21, 
,9B,CC, 
,23,10, 
,00,C8, 
, 11 , 86 , 
,29,29, 
,00,19, 
,06,OD, 
/El,CD, 
,07,F5, 
,77,Fl, 
,11,BA, 
, 01 , 00 , 
,3E,OF, 
,8A,OD, 
,00,FA, 
,20,08, 
,08,20, 
,OC,60, 
,E4,4F, 
,03,80, 
,88,43, 
,13,90, 


22,71 
32,73 
23,7B 
74,9C 
03,9C 
EF,C9 
DD, BE 
9C,D5 
19,29 
7C,F6 
1A,CD 
8D, 97 

DC, 6B 
CB, 09 
9C, B’D 

DD, 7E 
C9,3E 
00,00 
29,00 
20,08 
08,10 
10,10 
E4,27 
03,80 
84,43 
OC, 60 


,9C,C9 
,9C,2A 
,3D,77 
,3A,7 3 
,C4,08 
,3A,73 
,02,C9 
,FD,6E 
,29,29 
,E8,67 
,3C,9C 
,10,ED 
,9C,D4 
,DC,89 
,21,00 
,02,32 
,F0,C9 
,EA,EF 
,27,03 
,40,04 
,10,OC 
,23,88 
,C8,23 
,OC,60 
,84,40 
,03,80 


,3A,7 3,9C 
,71,9C,DD 
,23,22,71 
,9C,47,C5 
,9C,CI,FD 
,9C,90,3C 
,11,AO,9C 
,01,26,00 
,29,FD,5E 
,06,OD,Dl 
,1A,CD,3C 
,AF,C9,01 
,6E,9C,AE 
,97,10,EC 
,00,DD,7E 
,00,00,C3 
, 00 , 00,00 
,FF,OE,28 
,80,OC,60 
,40,04,40 
,60,03,80 
,27,C8,4F 
,88,10,10 
,13,90,23 
,04,23,88 


[1351] 

[1765] 

[2321] 

[2342] 

[1507] 

[1242] 

[1853] 

[1805] 

[1652] 

[1602] 

[2391] 

[ 2010 ] 

[917] 

[2153] 

[2307] 

[ 1202 ] 

[1767] 

[2092] 

[ 1102 ] 

[1837] 

[1323] 

[1575] 

[1628] 

[911] 

[1266] 

[1403] 


1 '************************************ 

2 '* GLOBEFNT.BLD * 

3 '* nur CPC 6128 * 

4 '* (c)1992 Ronald Heitmann * 

5 '************************************ 

10 MEMORY &9FFF 
20 FOR adr^&ÄOOO TO 
,VAL("&"+a$):NEXT 
25 SAVE"globe.fnt",b 
40 DATA 00,00,00,00, 

50 DATA 80,80,00,80, 

60 DATA 00,00,60,90, 

70 DATA 78,AO,70,28, 

80 DATA CÖ,0C,0C,00, 

90 DATA 00,40,40,80, 

100 DATA 80,80,80,80 
110 DATA 40,80,00,00 
120 DATA 00,20,20,F8 
130 DATA 00,00,40,40 
140 DATA 00,00,00,00 
150 DATA 08,10,20,40 
160 DATA C8,88,70,00 
170 DATA 00,70,88,08 
180 DATA 08,30,08,88 
190 DATA 10,10,00,F8 
200 DATA 70,88,80,FO 
210 DATA 10,20,20,20 
220 DATA 70,00,70,88 
230 DATA 00,CO,CO,00 
240 DATA 92,54,38,10 
250 DATA 00,00,00,FO 
260 DATA 20,10,20,40 
270 DATA 00,20,00,48 
280 DATA 70,88,88,F8 
290 DATA FO,88,88,FO 
300 DATA 70,00,FO,88 
310 DATA 80,80,EO,80 
320 DATA 80,80,80,00 
330 DATA 00,88,88,88 
340 DATA 80,80,80,80 
350 DATA 88,70,00,88 
360 DATA 80,80,80,80 
370 DATA 88,88,88,88 
380 DATA 84,00,70,88 
390 DATA 88,88,88,FO 
400 DATA A8,90,68,00 
410 DATA 00,70,88,80 
420 DATA 20,20,20,20 
430 DATA 88,70,00,88 
440 DATA 88,88,88,88 
450 DATA 20,50,88,88 
460 DATA 20,00,F8,08 
470 DATA 70,88,88,F8 
480 DATA 88,88,70,00 
490 DATA 00,10,38,54 
500 DATA 00,00,00,00 
510 DATA 00,00,00,00 
520 DATA 80,80,FO,88 
530 DATA 88,80,88,70 
540 DATA 78,00,00,00 
550 DATA AO,80,CO,80 
560 DATA 88,78,08,FO 
570 DATA 00,80,00,80 
580 DATA 08,08,08,08 
590 DATA AO,90,00,80 


&A2FF:READ a$:POKE adr 

,&A000,&3000:END 
00,00,00,00,80,80,80 
0 0,AO,AO,00,00,00,00 
90,60,00,00,00,00,20 
FO,20,OQ,C0,C0,0C,30 
40,AO,ÄO,40,A8,90,68 
00,00,00,00,00,40,80 
,40,00,80,40,40,40,40 
,A8,70,D8,70,A8,00,00 
,20,20,00,00,00,00,00 
,80,00,00,00,FO,00,00 
,00,00,00,CO,CO,00,00 
,80,00,00,70,88,98,A8 
,40,CO,40,40,40,40,40 
,70,80,80,F8,00,70,88 
,70,00,80,80,90,90,FO 
,80,80,FO,08,88,70,00 
,88,88,70,00,F8,08,08 
,00,70,88,88,70,88,88 
,88,78,08,88,70,00,00 
,CO,CO,00,10,10,10,10 
,18,30,60,CO,60,30,18 
,00,00,FO,00,00,80,40 
,80,00,70,88,88,10,20 
,48,90,00,00,00,00,00 
,88,88,88,00,FO,88,88 
,00,70,88,80,80,80,88 
,88,88,88,88,FO,00,F8 
,80,F8,00,F8,80,80,E0 
,78,84,80,80,8C,84,7C 
,F8,88,88,88,00,80,80 
,80,00,08,08,08,08,08 
,90,AO,CO,AO,90,88,00 
,80,80,FO,00,88,D8,A8 
,00,84,C4,A4,94,8C,84 
,88,88,88,88,70,00,FO 
,80,80,00,70,88,88,88 
,F0,88,88,88,F0,90,88 
,70,08,88,70,00,F8,20 
,20,00,88,88,88,88,88 
,88,88,88,88,50,20,00 
,A8,A8,50,00,88,88,50 
,00,88,88,88,50,20,20 
,10,20,40,80,F8,00,88 
,88,88,00,88,70,88,88 
,88,00,88,88,88,88,70 
,92,10,10,10,10,00,00 
,00,FF,30,18,OC,00,00 
,00,70,08,78,88,78,00 
,88,88,FO,00,00,00,70 
,00,08,08,78,88,88,88 
,70,88,FO,80,70,00,40 
,80,80,00,00,00,78,88 
,80,80,FO,88,88,88,88 
,80,80,80,80,00,08,00 
,88,70,80,80,90,AO,CO 
,80,80,80,80,80,80,00 


[1383] 

[927] 

[508] 

[ 1000 ] 

[1383] 

[134] 

[3233] 

[2268] 
[1308] 
[729] 
[2004] 
[1148] 
[1090] 
[1849] 
[1958] 
[1538] 
[1921] 
[1935] 
[1303] 
[1970] 
[1966] 
[1602] 
[1909] 
[1686] 
[2238] 
[2149 ] 
[1662 ] 
[1489] 
[1806] 
[1353] 
[1495] 
[1778] 
[1827] 
[2494] 
[2238] 
[1890] 
[1458] 
[2137] 
[1913] 
[2080] 
[1631] 
[2137] 
[1561] 
[1316] 
[1587] 
[1267] 
[1525] 
[2097] 
[1425] 
[1442] 
[1721] 
[2048] 
[2094] 
[1678] 
[1209] 
[1243] 
[1392] 
[1343] 
[1650] 
[2264] 
[1332] 
[2085] 
[1991 ] 
[1775] 


600 

610 

620 

630 

640 

650 

660 

670 

680 

690 

700 

710 

720 

730 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


00 , 00 , 
C8,88, 
70,00, 
00,78, 
80,80, 
00,40, 
88 , 88 , 
50,20, 
00 , 00 , 
88 , 88 , 
F8,00, 
00,70, 
88,98, 
80,CC, 


50,A8 
88,88 
00,00 
88,88 
80,00 
40,EO 
88,98 
00,00 
88,50 
78,08 
48,00 
88,88 
68,00 
3 3 , CC 


,A8,88, 
, 00 , 00 , 
,FO,88, 
,78,08, 
, 00 , 00 , 
,40,40, 
, 68 , 00 , 
, 00 , 88 , 
,20,50, 
,FO,00 , 
,70,08, 
,88,70, 
,70,88, 
, 33 , CC , 


88 , 00,00 
00,70,88 
88,FO,80 
08,00,00 
70,80,70 
40,40,00 
00 , 00,88 
88,A8,A8 
88 , 00,00 
00,F8,10 
78,88,78 
00,50,00 
88,90,88 
33,CC,33 


,00,BO 
, 88,88 
,80,00 
,BO,C8 
,08,FO 
, 00,00 
,88,50 
,50,00 
, 00,88 
,20,40 
,00,50 
, 88,88 
,88,BO 


[1771 ] 
[1937] 
[1247 ] 
[1763] 
[1391] 
[1489] 
[1412] 
[2206] 
[1525] 
[1590] 
[2318] 
[1905] 
[1379] 
[1314] 


]_ f ************************************ 

2 '* DRAW.BLD * 

3 '* nur CPC 6128 * 

4 '* (c)1992 Ronald Heitmann * 

5 '************************************ 

10 MEMORY &9CFF 

20 FOR adr=&9D00 TO &A252:READ a$:POKE adr 
,VAL("&"+a$):NEXT 
25 SAVE"draw.bin",b,&9D00,&554 
40 DATA 21,23,9D,01,09,9D,C3,D1,BC,14,9D 
50 DATA C3,27,9D,C3,8E,9F,C3,BE,9F,44,52 
60 DATA 41,D7,53,45,54,D7,47,45,54,43,4F 
70 DATA D2,00,00,EB,2C,0F,CD,1C,9F,38,27 
80 DATA DD,7E,04,32,56,9F,CD,DE,BB,2A,88 
90 DATA 9F,ED,5B,86,9F,CD,CO,BB,CD,45,9F 
100 DATA ED,53,86,9F,22,88,9F,DD,7E,06,B7 
110 DATA C2,F6,BB,C3,CO,BB,DD,7E,06,B7 , CA 
120 DATA 79,9E,F3,DD,4E,04,79,32,56,9F,06 
130 DATA 00,21,8A,9F,09,7E,32,9A,9E,32,BF 
140 DATA 9E,CD,45,9F,E5,D5,2A,88,9F,ED,5B 
150 DATA 86,9F,CD,3C,9F,ED,53,76,9F,22,78 
160 DATA 9F,Dl,El,CD,3C,9F,E5,2A,76,9F,B7 
170 DATA ED,52,44,4D,FA,A6,9D,2A,76,9F,EB 
180 DATA 22,76,9F,2A,78,9F,E3,22,78,9F,18 
190 DATA 08,21,00,00,B7,ED,42,44,4D,Dl,2A 
200 DATA 78,9F,B7,ED,52,EB,F2,CB,9D,21,00 
210 DATA 00,B7,ED,52,54,5D,B7,ED,42,21,01 
220 DATA 00,30,27,18,0A,62,6B,B7,ED,42,21 
230 DATA FF,FF,30,09,22,7A,9F,60,69,3E,FF 
240 DATA 18,19,E5,2A,76,9F,09,22,76,9F, 2A 
250 DATA 78,9F,B7,ED,52,22,78,9F,E1,22,7A 
260 DATA 9F,60,69,EB,AF,32,85,9F,13,ED,53 
270 DATA 80,9F,23,CD,F6,9E,22,7C,9F,ED,53 
280 DATA 7E,9F,ED,4B,80,9F,50,59,CB,3A,CB 
290 DATA 1B,C5,ED,4B,7C,9F,2A,7E,9F,19,EB 
300 DATA 2A,80,9F,B7,ED,52,30,07,19,EB,B7 
310 DATA ED,52,EB,03,D5,3A,85,9F,B7,28,1F 
320 DATA 2A,76,9F,54,5D,09,22,76,9F,44,4D 
330 DATA 0B,2A,78,9F,E5,3E,FF,CD,85,9E,Dl 
340 DATA 2A,7A,9F,19,22,78,9F,18,1F,2A,78 
350 DATA 9F,54,5D,09,22,78,9F,44,4D,0B,EB 
360 DATA ED,5B,76,9F,D5,3E,FF,CD,A6,9E,D1 
370 DATA 2A,7A,9F,19,22,76,9F,D1,C1,0B,78 
380 DATA Bl,20,9B,CD,45,9F,ED,53,86,9F,22 
390 DATA 88,9F,FB,C9,E5,62,6B,B7,ED,42,AF 
400 DATA 95,6F,9F,94,67,24,2C,E3,CD,C9,9E 
410 DATA Dl,43,16,00,CD,52,9F,CB,09,DC,6D 
420 DATA A1,10,F6,C9,E5,B7,ED,42,AF,95,6F 
430 DATA 9F,94,67,24,2C,E3,60,69,CD,C9,9E 
440 DATA 7C,F6,C0,67,D1,43,16,00,CD,52,9F 
450 DATA CD,6F,Al,10,F8,C9,7D,ED,44,C6,C7 
460 DATA 6F,E6,07,67,AD,6F,4F,06,60,29,29 
470 DATA 09,29,7B,CB,3A,CB,1B,CB,3B,19,OE 
480 DATA 88,E6,03,28,05,47,CB,39,10,FC,06 
490 DATA 03,11,84,9F,79,12,C9,7B,B2,C8,C5 
500 DATA 44,4D,21,00,00,78,06,10,CB,11,17 
510 DATA CB,15,CB,14,E5,ED,52,3F,38,01,E3 
520 DATA 33,33,10,EE,EB,CB,11,69,17,67,CI 
530 DATA C9,CD,45,9F,CD,2A,9F,D0,2A,88,9F 
540 DATA ED,5B,86,9F,CD,3C,9F,B7,01,C8,00 
550 DATA ED,42,D0,B7,21,D2,00,EB,ED,52,C9 
560 DATA CB,3C,CB,ID,CB,3A,CB,1B,C9,DD, 56 
570 DATA 03,DD/5E,02,DD/66,01/DD,6E/00,C9 
580 DATA CD,60,9F,3E,00,BB,D8,C8,7A,AE,Al 
590 DATA AE,77,C9,7E,A1,5F,C8,E6,F0,28,0B 
600 DATA 7B,E6,0F,28,03,1E,03,C9/1E,01,C9 
610 DATA IE,02,C9,00,00,00,00,00,00,00,00 
620 DATA 00,00,00,00,00,00,00,00,00,00,00 
630 DATA 00,00,FO,OF,FF,EB,22,96,Al,DD,66 
640 DATA 03,DD,6E,02,E5,CD,A2,Al,22,86,Al 
650 DATA El,CD,9E,Al,22,88,Al,DD,66,05,DD 
660 DATA 6E,04,22,00,AF,E5,CD,A2,Al,22,8A 
670 DATA A1,E1,CD/9E,A1,22/8C,A1,C9/DD,66 
680 DATA 03,DD,6E,02,E5,CD,A2,A1,22,94,A1 
690 DATA El,CD,9E,Al,22,92/Al,ED,5B,96/Al 
700 DATA DD,66,05,DD,6E,04,B7,ED,52,E5,CD 
710 DATA A2,A1,22,8E,Al,El,CD,9E,Al,22,90 


[1383] 
[722 ] 
[508] 
[ 1000 ] 
[1383] 
[186] 
[2683] 

[1218] 

[1337] 

[1726] 

[1333] 

[ 2002 ] 

[1656] 

[836] 

[2006] 

[1149] 

[921] 

[1507] 

[1348] 

[1843] 

[1604] 

[1791] 

[1433] 

[ 1100 ] 

[957] 

[2267] 

[2465] 

[1988] 

[1864] 

[951] 

[849] 

[1706] 
[1587] 
[2494] 
[1876] 
[1728] 
[2582] 
[2357] 
[2157] 
[1888] 
[1033] 
[1772] 
[ 2022 ] 
[2319] 
[1816] 
[1873] 
[858] 
[1984] 
[2206] 
[1445] 
[1600] 
[1208] 
[980] 
[2290] 
[1628] 
[1638] 
[1599] 
[2015] 
[708] 
[1086] 
[1792] 
[1990] 
[3246] 
[2114] 
[1092] 
[1514] 
[1009] 
[1998] 
[1377] 
[1079] 
[2522] 
[1875] 
[1377] 
[1273] 
[2544] 
[1545] 
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720 DATA Al,CD,24,A0,EB,DD,66,0D,DD,6E,0C [1308] 

730 DATA 73,23,72,CD, A9 ,AO,EB,DD,66,OB,DD [1695] 
740 DATA 6E,OA,73,23,72,CD,E5,A0,7C,B7,C8 [1681] 
750 DATA DD,7E,00,B7,20,08,DD,66,09,DD,6E [1303] 
760 DATA 08,77,C9,DD,66,07,DD,6E,06,36,01 [1105] 

770 DATA C9,2A,92,A1,ED,5B,8E,Al,CD,DB,Al [2834] 
780 DATA ED,5B,08,Al,CD,DB,Al,3A,93,Al,47 [743] 

790 DATA 3A,8F,A1,A8,47,3A,89,A1,A8,26,00 [1535] 

800 DATA C4,7E,Al,22,98,Al,2A,94,Al,ED,5B [1901] 
810 DATA 8A,A1,CD,DB,Al,ED,5B,86,Al,CD,DB [1803] 
820 DATA Al,3A,95,A1,47,3A,8B,Al,A8,47,3A [1861] 
830 DATA 87,Ä1,A8,C4,7E,A1,22,9Ä,A1,2A,92 [1693] 

840 DATA Al,ED,5B,8C,Al,CD,DB,Al,ED,5B,90 [2399] 

850 DATA Al,CD,DB,Al,ED,5B,86,Al,CD,DB,Al [2361] 
860 DATA 3A,93,Al,47,3A,8D,Al,A8,47,3A,91 [1659] 

870 DATA Al,A8,47,3A,87,A1,Ä8,C4,7E,A1,22 [1462] 

880 DATA 9C,Al,ED,5B,98,A1,19,ED,5B,9A,Al [2213] 
890 DATA 19,C9,2A,92,Al,ED,5B,90,A1,CD,DB [1104] 
900 DATA Al,ED,5B,8A,Al,CD,DB,Al,3A,93,Al [2107] 
910 DATA 47,3A,91,Al,A8,47,3A,8B,Al,A8,CC [1381] 
920 DATA 7E,A1,22,98,A1,2A,94,A1,ED,5B,8C [1710] 

930 DATA Al,CD,DB,Al,3A,95,Al,47,3A,8D,Al [1665] 
940 DATA A8,ED,5B,98,A1,19,C9,2A,94,Al,ED [2335] 
950 DATA 5B,8A,Al,CD,DB,Al,ED,5B,88,Al,CD [1517] 
960 DATA DB,Al,3A,95,Al,47,3A,8B,Al,A8,47 [1106] 

970 DATA 3A,89,Al,A8,26,00,C4,7E,Al,22,98 [2075] 

980 DATA Al,2A,92,Al,ED,5B,8E,Al,CD,DB,Al [1335] 
990 DATA ED,5B,86,Al,CD,DB,Al,3A,93,Al,47 [2207] 

1000 DATA 3A,8F,Al,A8,47,3A,87,Al,A8,CC,7E [1091] 
1010 DATA Al,22,9A,Al,2A,92,Al,ED,5B,90,Al [784] 
1020 DATA CD,DB,Al,ED,5B,8C,Al,CD,DB,Al,ED [1414] 
1030 DATA 5B,88,Al,CD,DB,Al,3A,93,A1,47,3A [2467] 
1040 DATA 91,Al,A8,47,3A,8D,Al,A8,47,3A,89 [1102] 
1050 DATA Al,Ä8,22,04,AF,C4,7E,Al,22,9C,A1 [1552] 
1060 DATA ED,5B,98,Al,19,ED,5B,9Ä,Al,19,C9 [1036] 
1070 DATA 23,C9,7C,C6,08,67,D0,D6,40,67,7D [1762] 
1080 DATA C6,50,6F,D0,24,C9,7C,2F,67,7D,2F [1637] 
1090 DATA 6F,23,C9,00,00,00,00,00,00,00,00 [2283] 
1100 DATA 00,00,00,00,00,00,00,00,00,00,00 [1009] 
1110 DATA 00,00,00,00,00,01,5A,00,09,23,CB [1455] 
1120 DATA 7C,28,04,01,68,01,09,01,68,01,A7 [2152] 
1130 DATA ED,42,30,01,09,E5,01,B4,00,ED,42 [1304] 
1140 DATA 30,01,09,7D,FE,5A,38,03,3E,B4,95 [1615] 
1150 DATA 32,D9,A1,D1,21,B4,00,AF,ED,52,30 [1419] 
1160 DATA 01,3D,67,FD,21,F8,A1,FD,6E,00,C9 [2026] 
1170 DATA 7D,E5,21,00,00,06,08,16,00,0F,30 [1665] 
1180 DATA 01,19,CB,3C,CB,1D,10,F6,F1,3C,C0 [415] 
1190 DATA EB,67,6F,A7,ED,52,C9,00,04,09,0D [1111] 
1200 DATA 11,16,1A,1F,24,28,2C,31,35,39,3E [1780] 
1210 DATA 42,46,4A,4F,53,57,5B,5F,64,68,6C [2061] 
1220 DATA 70,74,78,7C,80,83,87,8B,8F,92,96 [1609] 
1230 DATA 9A,9D,Al,A4,A8,AB,AE,Bl,B5,B8,BB [2439] 
1240 DATA BE,CI,C4,C7,C9,CC,CF,Dl,D4,D7,D9 [1670] 
1250 DATA DB,DD,EO,E2,E4,E6,E8,E9,EB,ED,EF [2321] 
1260 DATA F0,F2,F3,F5,F6,F7,F8,F9,FA,FB,FC [1954] 


1270 DATA FD,FD,FE,FF,FF,FF,FF,FF,FF,FF [2290] 


1 '************************************ [1383] 

2 '* DISCS.BLD * [141] 

3 '* nur CPC 6128 * [508] 

4 '* (c)1992 Ronald Heitmann * [1000] 

5 /************************************ [1383] 

10 MEMORY &A54F [750] 

20 FOR adr=&A550 TO &A6EA:READ a$:POKE adr [3584] 

,VAL("&"+a$):NEXT 

25 SAVE"discs.bin",b,&A550,&19C [2256] 

40 DATA 21,7E,A5,01,59,A5,C3,Dl,BC,6A,A5 [2084] 

50 DATA C3,82,A5,C3,0F,A6,C3,4C,A6,C3,7E [2163] 

60 DATA A6,C3,CD,A6,53,54,41,54,C5,46,49 [888] 

70 DATA 4E,C4,43,41,D4,46,49,4C,C5,4E,55 [1924] 

80 DATA CD,00,00,00,00,00,11,00,00,3A,00 [1695] 


90 DATA A7,DF,FD,A5,3A,4C,BE,07,07,07,E6 [929] 

100 DATA 01,DD,6E,04,DD,66,05,77,FE,01,CO [1487] 
110 DATA 3A,00,A7,11,00,00,DF,00,A6,30,41 [1317] 

120 DATA DF,03,A6,DF,06,A6,DF,09,A6,30,02 [1726] 

130 DATA 18,F9,DF,OC,A6,DD,6E,00,DD,66,01 [2271] 

140 DATA 7 3,01,7E, P’B, IE, 04 , CD, F3 , A5 , F5,3A [2184] 
150 DATA 00,A7,5F,Fl,CD,F3,A5,3E,78,32,FA [1918] 
160 DATA A5,CD,F3,A5,07,07,E6,01,DD,6E,02 [1463] 

170 DATA DD,66,03,77,3E,59,32,FA,A5,C9,3E [1099] 
180 DATA 02,DD,6E,04,DD,66,05,77,C9,ED,78 [2084] 

190 DATA F2,F3,A5,OC,ED,59,0D,C9,30,C6,07 [2081] 

200 DATA 6C,C5,07,73,CD,07,83,D6,07,98,D6 [2819] 

210 DATA 07,C2,D8,07,EB,23,7E,5F,23,7E,57 [2000] 

220 DATA 21,01,87,01,00,08,1A,BE,20,OB,E5 [1617] 
230 DATA D5,C5,CD,3E,Ä6,C1,D1,E1,38,09,23 [1817] 

240 DATA OB,78,Bl,20,EB,AF,18,02,3E,FF,DD [1281] 
250 DATA 66,03,DD,6E,02,77,C9,06,0A,23,13 [1347] 

260 DATA 1A,BE,20,04,10,F8,37,C9,B7,C9,D5 [1858] 

270 DATA 21,01,87,54,5D,13,01,00,08,75,ED [1095] 
280 DATA B0,11,00,87,D5,3E,C9,32,5A,BB,CD [2536] 
290 DATA 9B,BC,3E,CF,32,5A,BB,El,06,40,OE [1356] 


300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


00 , 11 , 
F8,El, 
29,54, 
EB,El, 
06,07, 
13,1A, 
C4,A6, 
DD,5E, 
D 8 ,FE, 
06,40, 
0C,10, 
6E,0 2, 


OE,00 
79,77 
5D, 29 
D5,2 3 
CD, A 6 
ED,53 
77,10 
02,23 
5E, DO 
OE, 01 
F9 , AF 
77,C9 


,7E,B7,28 
,C9,D5,26 
,19,29,19 
, 7 E, 5 F, 2 3 
,A6,23,36 
,00,AF,77 
,F7,E5,D5 
,7E, 12 ,Dl 
,C 6 ,20,C9 
,11,OE,00 
,18,01,79 


,04,OC, 
,00,DD, 
, 11 , 01 , 
,7E,57, 
, 2 E,23, 
,23,13, 
,EB,DD, 
,El, C9 , 
,7B, 21 , 
,BE,28, 
,DD, 6 6 , 


19,10 
6 E, 04 
87,19 
El, EB 
06,02 
1A, CD 
56,03 
FE, 41 
01,87 
07,19 
03, DD 


[1373] 

[1855] 

[1800] 

[2163] 

[1587] 

[1692] 

[1490] 

[1174] 

[2586] 

[1874] 

[1761] 
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1 '*****************************+****** 

2 '* DIGIICON.BLD * 

3 '* nur CPC 6128 * 

4 '* (c)1992 Ronald Heitmann * 

5 '************************************ 

10 MEMORY &9FFF 

20 FOR adr=&A 000 TO &A 2 FF:READ a$:POKE adr 
,VAL("&"+a$):NEXT 

30 SAVE l, digiicon.bin" ,b,S.A000,&3000 
40 DATA 00,00,00,00,OE,CB,3A,0C,00, 88 ,22 
50 DATA 00,FF,FF,FF,EE,00,88,22,00,OC,CB 
60 DATA 32,OE,00,88,22,00,OE,E8,32,08,00 
70 DATA 88 ,22,00, 68 ,CB,3A,2C,00, 88 ,22,00 
80 DATA 2C,CB,B2,00,00,88,22,00,48,CB,3A 
90 DATA OE,00,88,22,00,OE,CA,32,OC,00,00 
100 DATA 00,00,00,OC,00,00,01,10,CO,40,02 
110 DATA 20,20,80,02,20,10,00,02,20,20,80 
120 DATA 04,10,CO,40,04,00,00,00,BF,FF,FF 
130 DATA 88,04,00,08,00,04,01,OC,00,02,02 
140 DATA OA,00,02,01,00,00,02,01,00,00,01 
150 DATA 02,00,00,00,OC,00,00,00,00,00,00 
160 DATA 0F,0F,0F,0E,78,F0,F0,82,78,F0,F0 
170 DATA O2,78,F0,EO,O2,78,F0,C0,02,78,F0 
180 DATA 80,02,78,FO,00,02,78,EO,00,02,78 
190 DATA CO,00,02,78,80,00,02,78,00,00,02 
200 DATA 68,00,00,02,48,00,00,02,OF,OF,OF 
210 DATA OE,00,00,00,00,00,00,00,00,FF,FF 
220 DATA FF,EE,8F,C0,61,2E,BC,00,10,A6,AC 
230 DATA CO,00,E2,C8,A4,00,62,D8,2C,00,62 
240 DATA C8,CO,00,62,C8,00,00,62,AC,00,00 
250 DATA A6,BC,00,10,A6,8F,CO,61,2E,FF,FF 
260 DATA FF,EE,OF,OF,OE,OE,09,02,07,02,OF 
270 DATA 0F,0F,OE,00,00,00,00,00,00,00,00 
280 DATA 00,77,88,00,11,88,66,00,22,24,11 
290 DATA 00,44,5E,00,88,45,EF,80,88,8B,EF 
300 DATA 80,44,9B,EF,80,44,89,DE,00,44,88 
310 DATA 3C,00,44,44,EO,00, 88 ,44,00,00 ,88 
320 DATA 22,00,11,00,11,88,66,00,00,77,88 
330 DATA 00,00,00,00,00,00,00,00,00,00,07 
340 DATA 30,00,01,08,40,80,02,00,40,80,04 
350 DATA 00,50,00,04,00,40,80,08,00,40,80 
360 DATA 08,00,50,00,08,00,40,00,08,00,00 
370 DATA 00,04,00,07,OC,04,00,00,OC,02,00 
380 DATA 01,04,01,08,06,04,00,07,08,00,00 
390 DATA 00,00,00,01,01,01,00,01,01,01,00 
400 DATA 01,01,01,00,EF,FF,EF,EE,01,01,01 
410 DATA 00,01,01,01,00,01,01,01,00,FF,EF 
420 DATA FF,EE,01,01,01,00,01,01,01,00,01 
430 DATA 01,01,00,EF,FF,EF,EE,01,01,01,00 
440 DATA 01,01,01,00,01,01,01,00,00,00,00 
450 DATA 00,E 6 ,77,CC,EC,FF,FF,FF,EE,FF, FF 
460 DATA FF,EE,FF,FF, FF, EE,FF, 8 C,37,EE, FF 
470 DATA 88 ,33,EE,FF, 88 ,33,EE,FF, 8 C,37 , EE 
480 DATA FF,FF,FF,EE,FF,FF,FF,EE,DE,FO,FO 
490 DATA 6 E,FC,FO,F0,E 6 ,FC,F0,FO,E 6 ,FC,FO 
500 DATA FO,E 6 ,F4,FO,FO,E4,00,00,00,00,00 
510 DATA 00,00,00,00,00,00,00,00,11,88,00 
520 DATA 00,11,88,00,00,00,00,00,00,00,00 
530 DATA 00,00,77,88,00,00,11,88,00,00,11 
540 DATA 88,00,00,11,88,00,00,11,88,00,00 
550 DATA 11, 88 ,00,00,77,EE,00,00,00,00,00 
560 DATA 00,00,00,00,00,00,00,00,00,11,00 
570 DATA 00,00,11,10,CO,00,11,20,00,00,11 
580 DATA 20,00,00,19,10,80,00,15,20,40,00 
590 DATA 1F,20,40,03,15,10,80,04,19,00,00 
600 DATA 08,11,00,02,08,11,00,02,04,11,00 
610 DATA 04,03,19,03,08,00,07,OC,00,00,11 
620 DATA 00,00,00,00,00,00,00,77,CC,00,11 
630 DATA 88,33,00,22,00,00,88,44,00,00,44 
640 DATA 44,00,00,44,88,00,00,22,88,00,00 
650 DATA 22,88,11,00,22,88,22,88,22,88,44 
660 DATA 44,22,44,88,22,44,55,00,11,44,22 
670 DATA 00,00, 88 ,11,88,33,00,00,77,CC,00 
680 DATA 00,00,00,00,00,00,00,00,01,0F,0F 
690 DATA 00,01,07,OD,00,01,OF,OF,00,01,07 
700 DATA 0D,00,01,0F,0F,00,01,07,0D,00,01 
710 DATA 0F,0F,00,77,FF,FF,CC,44,00,00,44 
720 DATA 44,11,BB,44,44,00,00,44,44,00,00 
730 DATA 44,77,FF,FF,CC,73,FF,FF,C 8 
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1 '************************************ [1383] 

2 '* H-COPYS .BLD * [349] 

3 '* nur CPC 6128 * [508] 

4 '* (c)1992 Ronald Heitmann * [ 1000 ] 

5 /************************************ [1383] 

10 MEMORY &A25F [752] 

20 FOR adr=&A260 TO &A545:READ a$:POKE adr [2288] 

,VAL("&"+a$):NEXT 

25 sav"h-copys.bin",b,&A260, &2E5 [1874] 

40 DATA 21,7Ä,A2,01,6Ä,A2,CD,D1,BC,C9,72 [2389] 

50 DATA A2,C3,CA,A2, C3,7E,A2,48,C3,42,4C [2082] 

60 DATA 41,43,CB,00,00,00,00,00,AF,32,9A [1938] 

70 DATA A2,3E,FF,06,28,21,1D,A5,77,23,10 [2003] 

ÖD DATA FC,FD,21,ID,A5,16,04,FD,E5,15 , DD [1626] 

90 DATA 7E,00,FE,00,38,03,32,9A,A2,B7,28 [2283] 

100 DATA 0E,47,FD,72,00,FD,23,FD,23,FD,23 [2837] 

110 DATA FD,23,10,F3,FD,El,FD,23,DD,23,DD [1553] 
120 DATA 23,7A,B7,20,D6,3A,9A,A2,32,F1,A2 [1560] 

130 DATA 32,85,A3,32,25,A4,C9,7B,B7,CA,09 [1974] 

140 DATA A4,3D,28,03,C3,69,A3,ED,73,0A,A5 [1313] 
150 DATA 16,1B,CD,CO,A4,16,41,CD,CO,A4,16 [2269] 

160 DATA 06,CD,CO,A4,21,00,C8,06,42,OE,88 [2072] 

170 DATA C5,06,00,DD,21,ID,A5,E5,C5,CD,D5 [2265] 
180 DATA A4,16,1B,CD,CO,A4,16,2A,CD,CO,A4 [1800] 
190 DATA 16,05,CD,CO,A4,16,00,CD,CO,A4,16 [1337] 

200 DATA 02,CD,CO,A4,06,49,CD,02,A5,11,D7 [1609] 
210 DATA 00,E5,D5,06,03,16,00,CD,90,A4,CD [2406] 
220 DATA A 6 ,A4,CB,02,CB,12,CD,F3,A4,10,Fl [1758] 
230 DATA CD,CO,A4,CD,CO,A4,Dl,El,CB,09,DC [1587] 
240 DATA F1,A4,1B,7A,B3,C2,1C,A3,06,0A,CD [1726] 
250 DATA 02,A5,16,OD,CD,CO,A4,01,04,00,DD [1662] 
260 DATA 09,CI,El,10,9F,16,OA,CD,CO,A4,CI [1561] 
270 DATA CD,F3,A4,CD,F3,A4,CD,F3,A4,10,87 [2060] 

280 DATA C9,16,1B,ED,73,OA,A5,CD,CO,A4,16 [1976] 

290 DATA 41,CD,CO,A4,16,06,CD,CO,A4,21,80 [1753] 

300 DATA FF,06,6A,OE,88,C5,06,00,DD,21,ID [1347] 
310 DATA A5,E5,C5,CD,D5,A4,16,1B,CD,CO,A4 [1364] 
320 DATA 16,2A,CD,CO,A4,16,04,CD,CO,A4,16 [798] 

330 DATA 00,CD,CO,A4,16,03,CD,CO,A4,06,18 [1513] 

340 DATA CD,02,A5,11,C8,OÖ,E5,D5,C5,06,02 [1524] 

350 DATA 16,00,CD,90,A4,CD,A6,A4,CB,02,CB [1862] 
360 DATA 12,7A,OF,CB,12,CB,09,DC,Fl,A4,10 [2476] 

370 DATA EB,CD,CO,A4,CD,CO,A4,CD,CO,A4,CI [1561] 
380 DATA Dl,El,CD,OC,A5,1B,7A,B3,C2,BO,A3 [2937] 
390 DATA 06,C8,CD,02,A5,16,0D,CD,C0,A4,01 [1984] 

400 DATA 04,00,DD,09,CI,El,10,96,16,OA,CD [1423] 
410 DATA CO,A4,CI,CB,09,DC,Fl,A4,CB,09,DC [1451] 
420 DATA Fl,A4,05,C2,83,A3,C9,ED,73,OA,A5 [2580] 
430 DATA 16,1B,CD,CO,A4,16,41,CD,CO,A4,16 [2269] 

440 DATA 07,CD,CO,A4,21,00,DO,06,IC,OE,88 [2075] 

450 DATA C5,06,00,DD,21,1D,A5,E5,C5,CD,D5 [2265] 
460 DATA A4,16,1B,CD,CO,A4,16,4B,CD,CO,A4 [2039] 
470 DATA 16,00,CD,CO,A4,16,02,CD,CO,A4,06 [1391] 

480 DATA 95,CD,02,A5,11,D7,00,E5,D5,06,07 [1687] 

490 DATA 16,00,CD,90,A4,CD,A6,A4,CB,02,CD [1868] 
500 DATA F3,A4,10,F3,CD,CO,A4,Dl,El,CB,09 [854] 

510 DATA DC,Fl,A4,1B,7A,B3,20,DE,06,FF,CD [1699] 
520 DATA 02,A5,16,OD,CD,CO,A4,01,04,00,DD [1662] 
530 DATA 09,CI,El,10,AA,16,OA,CD,CO,A4,06 [1971] 

540 DATA 07,CD,F3,A4,10,FB,C1,10,94,C9,7E [1681] 

550 DATA Al,C8,5F,E6,FO,28,OB,7B,E6,OF,28 [1962] 

560 DATA 03,3E,03,C9,3E,01,C9,3E,02,C9,DD [1987] 

570 DATA BE,00,28,12,DD,BE,01,28,OD,DD,BE [2349] 
580 DATA 02,28,08,DD,BE,03,28,03,CB,BA,C9 [2175] 
590 DATA CB,FA,C9,CD,09,BB,FE,20,28,09,CD [2471] 
600 DATA 2E,BD,38,F4,7A,C3,2B,BD,ED,7B,OA [1353] 
610 DATA A5,C9,16,1B,CD,C0,A4,16,5A,CD,C0 [1626] 

620 DATA A4,78,E6,07,57,CD,CO,A4,16,00,CD [1629] 
630 DATA CO,A4,78,E6,07,47,18,11,23,C9,7C [1419] 

640 DATA C6,O8,67,D0,D6,4O,67,7D,C6,5O,6F [1622] 

650 DATA DO, 24,C9,16,00,CD,CO,A4,1.0,FB,C9 [852] 
660 DATA 00,00,7C,D6,08,67,FE,C0,D0,C6,40 [2069] 

670 DATA 67,7D,D6,50,6F,DO,25,C9,00,00,00 [985] 

680 DATA 00,00,00,00,00,00,00,00,00,00,00 [1009] 

690 DATA 00,00,00,00,00,00,00,00,00,00,00 [1009] 

700 DATA 00,00,00,00,00,00,00,00,00,00,00 [1009] 

710 DATA 00,00,00,00,00 [568] 


1 ************************************* [1463] 

2 * STAEDTE.GEN * [1013] 

3 * nur CPC 6128 * [626] 

4 * (c)1992 Ronald Heitmann * [2112] 

5 ************************************* 


10 

FOR t=65 TO 90 

[998] 

20 

OPENOUT CHR$(t):PRINT#9,0:CLOSEOUT 

[1188] 

30 

NEXT 

[ 350] 

40 

OPENOUT"orte":PRINT#9," ":CLOSEOUT 

[2232] 


^ "k ****************** -★*****•*Ir \k>k ****** ★ 

2 * WINGLOBE.BAS * 

3 * nur CPC 6128 * 

4 * (c)1992 Ronald Heitmann * 

5 ************************************* 

100 OUT &BCOO, 6 :OUT &BD00,0 

110 MEMORY &64FF:LOAD"globemc",&9000:CALL 

&9300:CALL &9D00:CALL &A260:CALL &A550:|GE 

NPOINT 

120 LOAD"digiicon",&8000:MODE 1:I RAHMEN,1, 
54,1,25: I RAHMEN,57,80,1,4: I RAHMEN,57,80,6, 
20: I RAHMEN,57,80,22,25 

130 POKE &BE78,255:MOVE 464,374,3:TAG:PRIN 
T"DIGI-Globe";:TAGOFF: I ICONS 
135 CALL &BB00 
140 RUN"globe 


[1463] 

[944] 

[626] 

[ 2112 ] 

[1463] 

[799] 

[4436] 


[8607] 


[3485] 

[399] 

[316] 


2 ************************************* [1463] 

2 * WINLINK.BAS * [577] 

3 * nur CPC 6128 * [626] 

4 * (c)1992 Ronald Heitmann * [ 2112 ] 

5 ************************************** [1463] 

10 'GLOBE - Linker [1215] 

20 ' [117] 

30 'macht aus den Verschiedenen M-Codes 1 [4147] 

einziges File 

35 ' ... [H7] 


110 MEMORY & 8 FFF:LOAD"digwin 2 .bin",&93Q0:L [8593] 
OAD"draw",&9D00:LOAD"h-copys.bin",&A260:LO 
AD"discs",&A550:LOAD"globe.fnt",&9000 
120 PRINT"Bitte WinGlobe Diskette einlegen [5212] 
":CALL &BB18 

130 SAVE"globemc",b,&9000,&16F0 [1351] 


Wir sind ganz Ohr... 

...für Ihre Fragen und Anregungen, was unser Heft betrifft - 
und alles andere rund um CPC oder PCW. Wollen Sie ein selbst¬ 
geschriebenes Programm im Heft unterbringen? Kennen Sie ein 
brandneues Programm, über das wir unbedingt etwas schreiben 
sollten? Kommen Sie mit einem der abgedruckten Listings nicht 
klar? Oder wollen Sie einfach mal mit einem von uns eine Runde 
fachsimpeln? 

Dann ist unsere 

Redaktions-Hotline 

auch für Sie interessant. 

Sie sind herzlich eingeladen - wir wissen zwar nicht auf jede 
Frage die richtige Antwort, aber mancher Knoten löst sich trotz¬ 
dem schon am Telefon. 

Jeden Dienstag von 16 bis 19 Uhr 

hängt das komplette Redaktionsteam der CPC Amstrad Interna¬ 
tional für Sie an der Leitung. Hier unsere Telefonnummern: 



Jörg Gurowski (ja) Ralf Schößler <rs) Peter Schmitz (sz) 

05651/809- 751 0 5651/809-752 05651/809- 753 
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CPC 


3D-MERSI 
(Heft 10/11*91) 

Im Artikel hieß es, “3D-Mersi" 
liefe zwar von Haus aus nur auf 
CPC 664/6128, ließe sich aber 
durch den Basic-1,1 -Emulator 
auch mit dem 464 versöhnen. 
Genau dies ist mir leider nicht 
gelungen; das Programm läuft 
hei mir nicht korrekt. Auch mein 
Grundgedanke, der Basic-1.1- 
Emulator müßte ein zweites Mal 
initialisiert werden. da er aus ir¬ 
gendwelchen Gründen nicht 
richtig im System verankert 
wurde, konnte mir nicht weiter¬ 
helfen. Haben Sie einen Tip? 

Frank Seide!, 
Hohenhameln 


Asche auf unser Haupt! Entge¬ 
gen der Behauptung im Artikel 
genügt der Emulator nicht, um 
“3D-MERSI” voll 464-tauglich 
zu machen. Abhilfe schaffen al¬ 
lerdings die folgenden beiden 
simplen Programmzeilen, die 
Sic ins Hauptprogramm einbau¬ 
en müssen: 

1 ON ERROR GOTO 2 : GOTO 10 

2 RESUME NEXT 

Red. 


CPC 464 


Diskette ausgetrickst 

Wenn ich als stolzer Besitzer ei¬ 
nes CPC 464 mit Zusatz-Disket¬ 
tenlaufwerk einem selbstge¬ 
schriebenen Programm eine 
“Execution Address" (Au¬ 
tostart-Adresse) verpasse und 
das Binärprogramm nun mit 
RUN starte, muß ich bestürzt 
feststellen, daß der Rechner das 
Diskettenlaufwerk als nicht 
mehr vorhanden betrachtet und 
auf den Kassettenrekorder zu¬ 
greift! Was ist passiert ? 

Werner Midier-Kirchen, 
Saarlouis 


Der Grund könnte darin liegen, 
daß die 464-Firmware, also das 
Betriebssystem, teilinitialisiert 
wird. Damit würden alle vor¬ 
handenen ROMs desinitialisiert 
(also das AMSDOS-ROM, aber 
auch VDOS oder XDDOS). 

Es gibt drei Möglichkeiten, 
auch nach einer solchen “ROM- 


Amnesie” noch das Disketten¬ 
laufwerk anzusprechen. Die er¬ 
ste ist eine recht weitverbreitete 
Lösung, wenn auch nicht die 
eleganteste. Für Maschinenpro¬ 
gramme aus der CPC Internatio¬ 
nal könnte es dennoch die beste 
sein: Man schreibt einen Basic- 
Loader, der aus drei Befehlen 
besteht: 

10 MEMORY ladeadresse-1 
20 LOAD"filename. 

ext",ladeadresse 
30 CALL einsprungs- 
adresse 

Der Nachteil dieser Lösung be¬ 
steht darin, daß das Programm 
nun ein weiteres Kilobyte auf 
der Diskette belegt (und einen 
weiteren Directory-Eintrag). 

Die zweite Möglichkeit spart 
dieses Kilobyte ein, verzichtet 
aber trotzdem nicht auf einen 
Basic-Loader und lauft darauf 
hinaus, quasi zwei Files in eines 
zu packen! 

Man schreibt ein Basic-Pro- 
g ram m mit n ur einer Zei le: 

10 CALL & 172 

Nun sucht man mittels Monitor 
die Endkennung des Basic-Pro- 
gramms (drei Null-Bytes). Hin¬ 
ter dem dritten Null-Byte be¬ 
ginnt das Maschinenprogramm, 
das natürlich an die entspre¬ 
chende Adresse assembliert 
werden muß! 

Abspeichern muß man es eben¬ 
falls per Assembler, da anson¬ 
sten von der Firmware nur die 
erste Zeile abgespeichert wird! 
Nun läßt sich das Programm mit 
RUN”filename.ext” starten - 
ROMs wie AMSDOS bleiben 
erhalten! 

Die dritte Möglichkeit besteht 
darin, die ROMs per Assembler 
wieder zu initialisieren! Dieser 
Weg wird - wie der zuerst be¬ 
schriebene - sehr häufig ge¬ 
wählt. Er macht sich jedoch ne¬ 
gativ bemerkbar, wenn man eine 
EPROM-Karte oder die Dobbcr- 
tin-Speichererweiterung mit 
EPROM-Sockeln besitzt! Der 
Grund dafür ist folgender: 
Wenn jemand XDDOS oder 
VDOS besitzt, aber nur ROM 7 
(AMSDOS) initialisiert, so 
kann zum einen nur noch von 
Drive A: gebootet werden. Zum 
anderen: Selbst wenn das Pro¬ 
gramm auf andere Laufwerke 
zugreifen sollte, lassen sich 
Sonderformate wie die von XD¬ 
DOS oder VDOS nicht erken¬ 
nen. da das hierfür notwendige 
ROM eben nicht initialisiert 


wurde. Abhilfe läßt sich nur 
schaffen, indem man alle ROMs 
von 0 bis 7 initialisiert. XDDOS, 
VDOS und andere Disk-Opera- 
tions-Systeme müssen nämlich 
unterhalb von AMSDOS liegen, 
um dessen Routinen patchen zu 
können. 

Das Initialisieren von Erweite- 
rungs-ROMS erfolgt per Routi¬ 
ne #BCCE (KERNEL INIT 
BACK). Die Routine, welche 
bei allen drei CPCs (und der 
Plus-Serie) an derselben Adres¬ 
se liegt, übergibt folgende Para¬ 
meter: 

Input: 

C = ROM-Select-Adresse 

des gewünschten ROMs 
DE = Adresse des ersten Bytes 
des freien Speicherplat¬ 
zes (incl.) 

HL = Adresse des letzten 
Bytes (incl.) 

Output: 

DE = Adresse des ersten Bytes 
des freien Speicherbe¬ 
reichs (incl.) 

HL = Adresse des letzten 
Bytes (incl.) 

C.IX.IY bleiben unverändert. 

Es sollte also eine Schleife in 
Assembler programmiert wer¬ 
den. die alle ROMs von 0 bis 7 
initialisiert (rückwärts!). 

Nun laufen auch alle Program¬ 
me unter anderen Diskettenbe¬ 
triebssystemen. Zu beachten ist 
allerdings, daß Routinen nicht 
zu weit über #A()00 liegen soll¬ 
ten. da sie ansonsten möglicher¬ 
weise mit EPROM/RAM-Daten 
kollidieren und somit nur Müll 
erzeugen oder unter Umständen 
sogar ganz abstürzen. 

Den Wert aus HL nach der letz¬ 
ten Schleife bei #BCCE sollte 
man zu einer Prüfung benutzen 
und nötigenfalls dem Benutzer 
mitteilen, daß zuviele EPROMs 
angeschlossen sind und ein kor¬ 
rekter Prog ram m a b I au f som i t so 
gut wie ausgeschlossen ist! 
Gleichzeitig also auch ein Tip 
für alle Nichtprogrammierer: 
Wenn mal ein Spiel, eine An¬ 
wendung oder eine Demo nicht 
laufen sollte, erst einmal die 
EPROM-Karte entfernen und es 
dann erneut probieren! (ROM- 
OFF hilft auch nicht immer, da 
hier nur eine rein softwaremäßi¬ 
ge Dcinitialisierung statt findet.) 
Mehr über die EPROM-Pro- 
grammierung finden Sie übri¬ 
gens in einem der nächsten Hel¬ 
le! 

Red. (Mike Behrendt) 


JOYCE 


Turbomodul Sprinter 

mit 256K RAM 498-DM 
mit 51 2K RAM 598,-DM 
mit 768K RAM 698-DM 
mit 1024K RAM 798,- DM 
TEAC-Floppies 
inkl. 15 Monaten Garantie: 
3.5" Zweitfloppy, 720 KB, 249,-DM 
5.25"Zweitfloppy, 720 KB, 329,-DM 
3,5" Driltfloppy, 720 KB, 

Laufwerk A: oder B:. 298,- DM 

5.25*DritlHoppy, 720 KB, 359,-DM 

Automatischer fcinzelblatteinzug für 
PCW 8xxx inkl, Software 298,- DM 

Doppellhobe Zeichen mit PCW 8xxx 
ab LocoScript 2.28 78,- DM 

ab März: MicroDesign III, dt 199,- DM 
TWEAK-Grafikmanipulationssoftware 


für sämtliche DTP-Programme 80,- DM 

Creative Tech, Key Mousc 159,- DM 

Qualitäts-Farbband schwarz 13,- DM 
Farbbänder FARBIG, 
blau, grün, rot braun 21DM 

Pelikan-Matrifilm Farbband 25,- DM 

Maxell 3" Disketten, 10 Stück 65.-DM 
10 NoName 3.5 " Disketten 12,- DM 

Teqmc/ie - Keyboard engl, 198,- DM 
deutsch auf Anfrage lieferbar 


JOYCE-Platinenservice 

Bernhard Graßhoff, Roesoll 36 
2305 Heikendorf 
Telefon, BTX 

04 31 / 24 55 83 

FAX 

04 31 / 24 37 70 

Kostenloser Gesamtkatalog auf Anfrage 



*** Unser neuer Service *** 
****“ für Sic ***»•* 


Wir konvertieren Ihre 
Dateien von CI’C/I’CW auf 
3,5" oder 5,25" Diskette zum 
günstigen l*reis, fragen Sie 
einfach einmal an. 

Streamer für PC incl. 

deutscher Software 

ah DM 598,- 

COM-ZU ELEKTRONIK 

MIcIimI KlirffU 

Maudacher Str.ZI5 
W-6700 LUDWIGSHAFEN 
TEL» 0621 / 559 558 
FAXt 0621 / 5 S 9 503 

BTXi 06XX / 5 S 9 503 - OOOI 
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Sie hatten Zeit für uns 


.... als wir in Heft 8/9'91 zur Le¬ 
serumfrage baten. Einen herzli¬ 
chen Dank vorab an alle, die 
mit gemacht haben: Ihre Mei¬ 
nungen, Vorschläge und Kritik 
sind nicht etwa (frei nach Bob 
Dylan) “in den Wind geschrie¬ 
ben", sondern helfen uns. die 
CPC Amstrad immer mehr zu 
Ihrem Heft zu machen. Einige 
der interessantesten Ergebnisse 
dieser Leserumfrage wollen wir 
Ihnen nicht vorenthalten. Wohl¬ 
an denn, hier ein Blick auf die 
Auswertung! 

Als echter I lammer darf gleich 
schon mal die Tatsache gelten, 
daß fast jeder zehnte Leser 
tatsächlich den Fragebogen 
zurückgeschickt hat. So ist das. 






was die Auswertung hier bringt, 
dann auch viel aussagekräftiger 
als bei Durchschnittsumfragen. 
Was die Ausstattung unserer 
Leser angeht, hat der CPC 6128 
offensichtlich die Nase vorn: 
40,4% der Einsender haben ei¬ 
nen. Immerhin 30,2% arbeiten 
mit einem CPC 464. Die “Plus”- 
Seric hat sich bislang offenbar 
noch nicht so recht durchge¬ 
setzt: Nur traurige 1,6% der Ein¬ 
sender haben schon einen der 
schwungvollen Neulinge. 

Bei den Speichermedien scheint 
die Kassette auf dem Weg in die 
Bedeutungslosigkeit zu sein: 
Nur noch 15% der befragten Le¬ 
ser arbeiten damit. Anders ver¬ 
hält es sich bei der Monitorfra- 
ge: Hier ist die einfache Lösung, 
sprich Griin, mit 53,8% keines¬ 
wegs out. 37,5% sehen nur far¬ 
big, und immerhin 8,7% gönnen 
sich das doppelte Vergnügen 
mit beiden Monitorsystemen. 
Und was sind das so für Leute, 
die die CPC lesen? Kopier- 
süchtige Teenies. Spielkälber, 
Ahnungslose? 

Weit gefehlt. Uns hat zunächst 
einmal das Durchschnittsalter 
der Einsender überrascht: Es 
liegt bei knapp über 30 Jahren. 
Dabei scheint der durchschnitt¬ 
liche CPCIer ein echter Eigen¬ 
brötler zu sein, denn nur 7% der 
Einsender gehören zu einem 
Computerclub oder einer User¬ 
gruppe. Auch in puncto Händler 
fühlen die meisten sich alleinge¬ 
lassen: Nur 20% kennen einen in 
ihrer Nähe, zu dem sie gehen 
können. 

Dann die nächste Überra¬ 
schung: 73,4 Prozent der Be¬ 
fragten gaben an, selbst zu pro¬ 
grammieren. Kein Wunder also, 
daß Lislings hoch im Kurs ste¬ 
hen: Nur 2,1% der Einsender 
hallen den Abdruck von Li- 
stings für überflüssig, ganze 
28.7% nutzen die Lektüre der 
Lislings als Anregung für die ei¬ 
gene Programmierkunst. Unter 
den Programmiersprachen steht 
Basic mit 60,2% erwartungs¬ 
gemäß an der Spitze, gefolgt 
von Assembler (18,7%) und 
Turbo Pascal (11,8%). 

Was die CPC, ihre Aufmachung 
und Themen angeht, bekamen 
wir reihenweise rote Köpfe - so 
beschämend gut waren die Zen¬ 
suren, die unsere Leser uns ga¬ 
ben. Das grafische Erschei¬ 
nungsbild der CPC etwa fanden 
76,5% gut oder noch besser, und 



unsere Texte machen auf 76,3% 
einen gut oder sehr gut verständ¬ 
lichen Eindruck. Danke für die 
Blumen! Wir fassen das Lob als 
Ermunterung auf und geben uns 
auch weiterhin Mühe. 

Der Star unter unseren Rubriken 
ist zweifellos die mit den “Tips 
und Tricks”: 82,6% gaben hier 
die Noten I oder 2. Die erste 
Konsequenz daraus finden Sie 
bereits in diesem Heft: Die neu¬ 
eröffnete “Trickkistc” ergänzt 
und verstärkt die beliebte Ru¬ 
brik. 

Eine Abfuhr erteilte die Mehr¬ 
heit unserer Leser dem Gedan¬ 
ken. Blicke über den Zaun auf 
andere 8-Bit-Systeme als die 
von Amstrad zu werfen. 32% 
finden die Idee “erträglich” und 
41,5% sogar “uninteressant”. 
Offenbar halten die CPCIer 
nicht viel von einer “breiten 
Front” der 8-Bit-Freundc. 

Am stärksten gewünscht dage¬ 
gen: B as ic- P rog ram m i er u n g 
(klar!), Themen rund um Dis¬ 
kette und Dateien, außerdem 
Nachhilfe in I lardware-Kunde. 
Der nächste Kandidat auf der 
Beliebtheitsskala ist das Thema 
Hardware-Steuerung, gefolgt 
von Angewandter Mathematik 
und pädagogisch orientierten 
Beiträgen. Ts, ts, da werden sich 
doch nicht etwa Legionen von 
Lehrern Hilfe für den Unterricht 
wünschen? 

Ein paar weitere Details können 
Sie den Schaubildem entneh¬ 
men, die wir auf dieser Seite ab¬ 
gedruckt haben. Sie dürfen sich 
darauf verlassen: Ihre Wünsche 
werden nicht ungehörl verhal¬ 
len. Was machbar ist, wollen wir 
auchangehen. 



Benotung: Programmthemen 

(von 1 

sehr gut bis 6 ■ ungenügend) 
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Ach so - da war doch noch et¬ 
was? Richtig, die 

Gewinner 

der ausgesetzten Preise. Hier 
sind sie: 

.für gen Suttmann in 4902 Bad 
Salzuflen gewinnt einen Origi¬ 
nal-Amst rad-Flachbettdruckcr 

DMP3160. 

Jürgen Marnik in 4495 Höck¬ 
lenkamp bekommt einen Gut¬ 
schein über 6 Databoxen. 

Je ein CPC-Jahresabo geht an: 
Kai-Ingo Kujat in 5090 Lever¬ 
kusen 3, Christian Milz in 8963 
Waltenhofen 2, Manfred Radtke 
in 7955 Ochsenhausen 2, Sven 
deutsch in 7530 Pforzheim und 
Axel Redeker in 7100 Heil¬ 
bronn. 

Je einen Satz CPC-Heflausga- 
ben (ab 1988) mit Sammelord¬ 
nergewinnen: 

Stephan Holy in 8500 Nürnberg 
50, Hans Jansen in 5100 Aa¬ 
chen, Dieter Hirsch in 8480 
Weiden/Oberpfalz, Norbert 
Witt ich in 3500 Kassel und 
Manfred Fender in 0-2200 
Greifswald. 

Über je ein CPC-Sonderhefle- 
Sammelpack können sich freu¬ 
en: 

Ralph Heinsohn in 2067 Rein- 
leid, Stefan Kiißner in 2121 
Reppenstedt, Benny Kurzwart 
in 4901 Hiddenhausen, Manfred 
Siewert in 5010 Bergheim und 
Thomas Eichele in 6950 Mos,- 
bach. 

Je ein CPC-Sonderhefl mit Da- 
taboxgingan: 

Hans-Peter Becker in 0-1153 



96 CPC 2/3'92 










































































Briefe 


Berlin, Rudi Schatz in 4650 Gel¬ 
senkirchen, Marcus Herbst in 
2190 Cuxhaven, Joachim 
Boßler in 8700 Würzbcrg und 
Henry Dähn in 3388 BadTlarz- 
burg. 

Auch die fünf Joyce-Sonderhef- 
tc mit Databox haben ihre Ge¬ 
winner gefunden: 

Rainer Boede in 2430 Neustadt, 
Kurt Oelenheinz in 6830 
Schwetzingen, Klaus Bienwald 
in 2820 Hamburg 77, Manfred 
Schimanski in 2000 Hamburg 
70 und Thomas Dahrn in 6600 
Saarbrücken. 


Mario Amberg aus 0-5700 
Mühlhausen schließlich ge¬ 
winnt einen Gutschein über 
DMV-Soflware im Wert von 
70.-DM. 

Allen Gewinnern einen herzli¬ 
chen Glückwunsch - sie haben 
ihre Preise inzwischen zuge- 
schickt bekommen. Allen Lesern, 
die mitgemacht haben, nochmal 
ein herzliches Dankeschön, und - 
bleiben Sie uns gewogen! 

Ihre CPC-Redaktion 


Offene Seite 


So eine richtige ganze Seite haben 
wir diesmal leider nach nicht zii- 
sammenbekommen, aber vielleicht 
wird das im nächsten Heft anders. 
Auf der offenen Seite können 
Clubs und Usergruppen kostenlos 
ihre Nachrichten und Bekanntma¬ 
chungen unterbringen. Schreibt 
an: 

DMV-Daten- und Medienverlag 
Redaktion CPC International 
- Clubseite - 
Postfach 2 50 
3440 Esch wege 

Hallo, CPCler und KC-Coni- 
pact-User! 

Zur Gründung eines CPC-Clubs 
suche ich noch Leute. Bitte melden 
bei: 

Carsten Finzel, Bahnstr. 18, 

0-7143 Lützschena 

Dürfen wir uns vorstellen? 

Wir sind der “Programmier-Club 
Augsburg" (P-C-A) und unter¬ 
scheiden uns von üblichen Compu¬ 


terclubs dadurch, daß bei uns eben 
vorwiegend programmiert wird. 
Wir sind spezialisiert auf BAS1C- 
Programme. Im Moment gibt es nur 
noch fünf Mitglieder, davon sind 
drei C’PC-User. Deshalb öffnen wir 
unsere Pforten für Anfänger, die 
sich vielleicht gerade erst einen 
CPC gekauft haben. Hier eine kur¬ 
ze Vorstellung unsererMitglieder: 
Gero Wenzel. 35, ist professionel¬ 
ler Programmierer und arbeitet 
außer mit seinem CPC, den er 
schon seit 1984 hat, auch mit dem 
PC!. Er schreibt vorwiegend An¬ 
wendungsprogramme zum priva¬ 
ten Zweck. 

Christoph Bruder, 15, verfügt über 
CPC, C-64 und C-16. Er ist, was 
den CPC angeht, bislang noch Ein¬ 
steiger. 

Roberto Annellini. 16, kennt sich 
mit seinem C-64 und mit MS-DOS 
gut aus. Sein Codename: “Iron 
Monitor". 

Rager Andreas, ebenfalls 16, hat 
einen Atari ST und schmückt sich 


mit dem Codenamen “Mega-Mix- 
Productions”. 

Siam Maicrböck, 15, wird auch 
“Ultra-Byte” genannt und pro¬ 
grammiert auf dem CPC. Er 
schreibt gern Utilities und Spiel¬ 
programme. ZurZeit arbeitet er an 
einem Simulationsspicl. 

Wir bieten interessierten CPC-Be- 
nutzern folgendes an: 

- Unterstützung für die Arbeit mit 
BASIC 

-Sammelbestellungen 

- Soft ware-Tausch 
-Tips und Tricks 

Unsere Erwartungen, die wir an In¬ 
teressenten stellen, sind nicht 
hoch: Man braucht lediglich einen 
CPC (Baureihe egal) und sollte in 
Augsburg oder Umgebung woh¬ 
nen. 

Kontaktadresse: 

Siam Maierbück. Kurt-Schuma- 
cher-Str. 129,8900 Augsburg 
Tel. (Dienstag 14-18 Uhr): 
0821/708057 


VORTEX SYSTEM 2000 Festplatten 
für die JOYCE PCW 8256/8512/9512: 


Festplattengröjk:: 

30 MB 

40 M B 

60 MB 

VORTEX Festplatte: 

684 - 

798 ,- 

997,50 

Mit zusätzl. 512 kB 
Speichererweiterung: 

883,50 

997,50 

1197 ,- 


Die VORTEX SYSTEM 2000 Festplatten mit/ohne zusätzl. 512 kB Spcicherer- 
wcitcrung sind ein komplett anschlußfertiges Fest plattensy stern in separatem 
beigen Gehäuse inkl. CP/M Plus V. 1.8 H (PCW 8xxx) bzw. V. 2.4 H (PCW 
9512), Festplattcnhilfsprogrammen sowie deutschem Benutzerhandbuch. 

Mit LocoScript V. I.xx bzw. 2.xx können Sie aur den VORTEX SYSTEM 2000 
Festplatten komfortabel arbeiten. Sämtliche LocoScript, -File, -Mail & -Spell 
V. 2Jx Programme sind zusammen mit einer VORTEX SYSTEM 2000 Fest¬ 
platte einsetzbar. 


LocoScript V. 2.3x "Update” 39,90 DM 


Erneuerungsprogramm für LocoScript V. 2.xx Originaldiskette mit neuem dl. 
Installationsprogramm & dt. Installationsanleitung für die JOYCE PCW 8xxx. 


LocoScript V. 2.3x ”Bundles”, usw. ... 


Ausführliche Informationen dazu und über viele weitere Produkte für alle 
AMSTRAD / Schneider JOYCE PCW 8256/8512/9512 bekommen Sic nach der 
Übersendung von 3,— DM in Briefmarken postwendend zugesandt. 


LocoScript PC V. I.xx Dt. 478,80 DM 


LocoScript PC V. I.xx in DL mit dt Installationsprogramm & dl. -hinweisen 
sowie englischen Handbüchern für PC/XT/AT/386/486, 'Notebooks", usw.... 
Deutsche Handbücher können nach Fertigstellung 1992’ für 119,70 DM nach- 
bezogen werden. LocoScript PC V. I.xx DL kostet inkl. der dt. Handbücher 
nach deren Fertigstellung 1992’ 478.80 DM + 119,70 DM = 598,50 DM. 

WIEDMANN 

Unternehmensberatung & Handel 

* Korbiniansplatz 2 * D 8045 Ismaning * 8 089 - 965029 * 

* Swebenhöhe 47 * D-2000 Hamburg 72 * 8 040 - 6436447 * 


512k Speichererweiterung für CPC 

• RAM-EWeiterung 64. t28.256 oder 512K tür alle CPCs 
Alle Versionen nachträglich aut Maxlmal-Version aulrüstbar 

• optional 2 EPROM-Socket mit frei wählbarer ROM-Nummer (1-15) 

• Patchprograrnm lür CP/M 2,2 (63K CP/M). Endlich lauten dBase, Multiplan und Wordstar 

• Patchprograrnm lür CP/M Plus. CP/M Plus auch tür CPC 464/664 

• resottosto RAM-Disc (maximal 448K) tür CP/M 2.2 und CP/M Plus 

• resetteste RAM-Disc unter BASIC (nur bei EPROM-Version) 

• 100% kompatibel zu dk'tronlcs RAM-Erweiterung und Silicon-Disc 

• Anschluß überden Expansionsporl (kein Eingriff in den Rechner nötig! 

• geringe Abmessungen (mit Gehäuse: 160 x 83 x 20 mm) durchgefühiter Erwottorungsbus 

RAM-E Weiterung mit Software lür CP/M 2.2 und CP/M Plus aut 3"-Diskette 
(wahlweise auch 3.5"- oder 5.25''-Dlskotle) 

Preise, ohne RAMs. 119,- DM 64 KByte. 149,- DM 128 KByte. 199.- DM 

256KByte.... 269- DM 5t2 Kßyto. 419.- DM 

Aufpreis tür zusätzliche EPHOM-Sookel und Software im EPROM 49,- DM 


Universeller EPROM-Programmer 4003 für Schneider 



IBM PC & CPC 464/664/6128 

• Programmiert alle gängigen EPROM- und 
EEPROM-Typen (z B. 2716, 27C16. 2732. 2732A, 
27C32, 2758. 2764, 2764A. 27C64, 27128, 27I28A, 
27C126 27256, 27C256, 2508, 2532, 2564.X2804A, 
X28I6A. X2B64A .) 

• Menügesteuerte Software auf Cassetlo/Diskofte 

• 32 KByle frei für EPROM-Dalen (Brennen des 27256 
ohne Nachladan) 

• Köln Umschalfen, Sleckenoder Löten nötig 

• Programmiorspannungon werden Im Gerät erzeugt 

• Verbindung zum Rechner über Flachbandkabel und 
Interface-Karte (CPC-Vbrsion mit durchgetührlem Ex¬ 
pansionsport) 

• Rote und grüne LED zur Botrioösartonanzolge 

• Komplett mll 2ßpoligem Taxttool-Sockol 


CPC-464/664 Kompletigoräf DM 289,50 Bausalz DM239,- 
CPC-6128 Kompletfgerftt DM319,50 Bausafz DM269.- 
PC-1512-Komplettgerät OM 399,50 Bausalz 0M 349.- 
• Aufpreis lür CPC-Software auf 3“-Disketto statt Cassolto DM 15.- • 


EPROM- Karte 224 KByte für alle CPC 

• Für die EPROM-Typen 2764. -128, -256 

• ROM-Nurmriern 0-15 frei wählbar 
' 7 Sockel 

' Bel 27256 zwei ROM-Nummorn pro Sockel 

• DurchgelÜhrter Expansionsport 

• Software zum automatischen Erstellen von Programmodulen (BASIC und BIN-Dateien) 

Fertiggetät für CPC 464/664 DM 145,- Fertiggorät tür CPC Gl28 DM 169,- 

Modul-Softwars auf 3‘'-Diskette DM 95,- 

Zubehör für EPROM-Karten 


EPROM 2764 DM 7,50 Protcxl-EPROM OM 124,- Maxam EPROM DM 124,- 

EPROM 27128 DM 8,50 Prometge Plus EPROM DM114- Ulooia DM 94.- 

EPROM 27256 DM10,50 XDD0SEPH0M DM 99- Alpha-ROM 0M 36.- 

EPROM 27512 DM17,50 Time-ROM (baiterlegepulfeile Echlzcituhr) + EPH0M DM135, 


DOBBERTin 


Industrio-Elektronik GmbH 
Brahmsstraße 9, 6835 Brühl 
Telefon 06202 / 71417 
Telefax 062 02/7 55 09 
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Die Würfel sind gefallen 

Die schönsten Schwarzweißgrafiken 

Gar nicht so leicht gestaltete sich die Auswahl der besten Einsendungen zu unserem 
Grafikwett bewerb aus der CPC 10/11*91. Wer bekommt den ersten Preis, werden 
zweiten? 


Zu den Teilnehmern unseres 
Schwarzweißgrafik-Weltbe¬ 
werbs zählen Personen jeder Al¬ 
tersgruppe; von 14 bis 70 ist al¬ 
les vertreten. 

Sic finden die sieben besten 
Grafiken auf diesen Seiten ab¬ 
gedruckt. Da aber, wie es heißt, 
die Letzten die Ersten sein sol¬ 
len. beginnen wir damit, einige 
Einsendungen vorzustellen, die 
sich gemeinsam den achten 
Platz und somit ein Spielpro¬ 
gramm als Trostpreis redlich 
verdient haben. 

Gabriele Dickel (30) aus Neu¬ 
bulach sandte uns eine Grafik 
mit dem Titel “Sommerpause”. 
Wer das Bild in seinen Compu¬ 
ter lädt, dem wird zwangsläufig 
das Wasser im Munde zusam¬ 
menlaufen. Steht doch - mitten 
im CPC - ein Eisbecher, gefüllt 
mit dieser kalten Köstlichkeit. 


Ob sie da vielleicht an eines ih¬ 
rer drei Kinder gedacht hat? Si¬ 
cher, denn nur zum Spaß pro¬ 
grammiert sie für ihre Kinder ei¬ 
gene Spielprogramme, die dann 
durch entsprechend schöne Gra¬ 
fiken aufgelockert werden. Als 
“Allrounder” kennt sic sich je¬ 
doch auch mit dBase aus, mit 
dem sie schon so manche Daten¬ 
bank aufgebaut hat. 

Andreas Lange (17) aus Tutt¬ 
lingen hat sich unseren “Fehler- 
leufel” aus der CPC 2/3*91 als 
Vorbild genommen und ihn 
schnell auf den Bildschirm ge¬ 
bracht. 

Mit Schirm, Charme und Melo¬ 
ne kann das leichtbekleidete 
Teufelchen zwar nicht aufwar¬ 
ten, dafür aber mit einem an¬ 
sehnlichen Dreizack. 

Eine stabile Burg, in der sich alle 
CPC- und PCW-Ercaks zusam¬ 


menschließen können, wünscht 
sich der vierzehnjährige Simon 
Sellugga aus Kiel. Wo er recht 
hat, hat er recht. Die CPC- und 
auch die PCW-Benulzer sollten 
wesentlich besser Zusammen¬ 
halten. Die“CPCZElT” ist noch 
lange nicht abgelaufen. 

Hans Sivkovich (38) aus Ham¬ 
burg versuchte, etwas mehr in 
Richtung moderner Kunst zu ar¬ 
beiten. Auf seinem CPC, der 
schon seit 1985 die an ihn ge¬ 
stellten Anforderungen erfüllt, 
entstand sein Beitrag “Clown 
mit Rose”. 

Marc-Oliver Slühmer (16) aus 
Reinfeld hat sich an eine der 
Schöpfungen der Kriegs¬ 
schmiede General Dynamics 
herangewagt. Einer “Fl5” mit 
Raketen und allem Drumherum 
(wo ist der Pilot?) reservierte er 
17 kByle Speicherplatz auf ei¬ 
ner seiner Disketten. 

Ein wesentlich friedlicheres 
Thema hat sich Rainer Voege 
(32) aus Düsseldorf heraus¬ 
gepickt. Passend zu dem näch¬ 
sten großen Fest, das uns wjeder 
einmal bevorsteht, wurden drei 
Hasen kurzerhand umfunktio¬ 
niert und müssen nun im CPC 
ihren Dienst als Osterhasen ver¬ 
richten. Allen Tierschützern sei 


gesagt, daß keinerlei Bedenken 
gegen diese Art der Tierhaltung 
bestehen, da die Häschen mit 
mehr als genug Futter (Eiern) 
ausgerüstet sind. Etwas ver¬ 
wundert waren wir nun doch, als 
wir die Grafik von Herrn Mus¬ 
termann aus Musterstadl in un¬ 
seren Computer laden wollten. 
Hat sich dieser Schelm doch ei¬ 
nen Scherz mit uns erlaubt. Eine 
andere Erklärung konnten wir 
einfach nicht finden, denn das, 
was da auf dem Monitor erschi¬ 
en, war zwar Scharzweiß, mit 
dem Motiv haperte cs jedoch 
immens. Vor lauter Strichen 
und wild auf dem Bildschirm 
umherspukenden Linien war 
nichts zu erkennen. Muster- 
mannsche moderne Grafik? 
Wer war der Schelm w i rk I ich ? 
Abschließend sei noch zu sagen, 
daß die starke Teilnahme an un¬ 
serem Wettbewerb uns moti¬ 
viert hat, in nächster Zeit gleich 
wieder einen Grafikwettbewerb 
zu starten. Setzen Sie sich also 
ruhig schon einmal an Ihren 
Computer, und überlegen Sie 
sich ein nettes Thema. Viel¬ 
leicht erwacht ja auch einmal 
ein Leonardo unter den Joycern, 
deren Teilnahme doch zu wün¬ 
schen übrigließ. 

Also ran an den Computer, 
schicken Sie die fertige Grafik 
an: 

DMV-Verlag 

Redaktion CPC International 
-GRAFIK- 
Fuldaer Straße 6 
3440 Esclnvege 

Nun aber zu den ersten sieben 
Plätzen, beginnend mit dem Sie¬ 
gerb ild. 

RalfSchößler 


I. Preis 

Name: Ernst Siedenberg 
Alter: 70 Jahre 

Bildtitel: Die Schwarzwaldbahn 
System: CPC 6128 

Herr Siedenberg hat mit den ihm zur Verfügung stehenden Mitteln 
versucht, die Eisenbahnbrücke in I lormberg (Schwarzwald) nach¬ 
zubilden. Seit Januar 1986 lut bei ihm ein CPC 664 seinen Dienst. 
Im August 1987 wurde dieser dann durch einen CPC 6128 ergänzt. 
I lauptsächlich verwendet Emst Siedenberg die zwei CPCs fürTcxt- 
verarbeitung und Grafik-Text. 

ZurGestaltungseiner Grafiken benutzt erdas Programm Micro-De- 
sign. Seinen Schriftverkehr wickelt er in erster Linie mit dem Tcxto- 
mat von Data Becker ab. 

Wollen w ir hoffen, daß er mit seinen 10 Programmen eine Menge 
Spaß hat und daß sie ihn möglichst lange an seinen CPC fesseln 
werden. 



Die Schur nuldbahn - Eisenbabnbroecke bei Börnberg , flngefert.Ernst Siedenberg. 
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2. Preis 

Name: Oliver Frank 
Aller: 18 
Bildtitel: Jaguar 
System :CPC 6128 

Als Amslrad 1989 die neuen PCs vorstellte, konnte man in diversen 
Läden eine Dia-Show mil den unterschiedlichsten Grafiken aut sel¬ 
bigen sehen. Unter anderem war da auch das Bild eines Jaguars in 
bester VGA-Qualitüt vertreten. Was lag also näher, als auch einmal 
aufeinem Acht-Bit-Computereinc ähnliche Grafik zu gestalten. 

Es wurden also alle vorhandenen Computerzeitungen nach einem 
ähnlichen Bild durchsucht, und in der Happy Computer 1 1/89 fand 
Herr Frank dann, was er gesucht hatte. 

Die Ursprungsgrafik war zwar nur vier Quadratzentimeter groß, 
aber mit Stop Press und einer ganzen Menge Fleiß ließ sich dann auf 
dem vorhandenen CPC 6128 das Bild in Mode 1 mit vier Farben rea¬ 
lisieren. Die Umsetzung in eine Schwarzweißgrafik erfolgte dann 
auch mit dem Programm Stop Press. 

Auf dem CPC 6128 liefen zu Anfang desöfteren Actionspiele. Das 
Interesse hat sich jedoch mit der Zeit gewandelt. Am liebsten spielt 
Oliver Frank jetzt anspruchsvollere Simulationen oder Rollenspie¬ 
le. Zu seinen Favoriten zählen unter anderem Sim City, The Bard’s 
Tale und Guild ofThieves. 

Mit dem CPC ist er sehr zufrieden und würd ihn sicher noch eine 
ganze Weile behalten. Dazu können sicherauch die neun Spielpro¬ 
grammebeitragen. 




4. Preis 

Name: Oldwig von Natzmer 
Alter: 69 

Bildtitel: Radrennen 
System: CPC 464 

I lerr Natzmer kann zu den wenigen gezählt werden, die ihrem CPC 
seit Ende 1984 treu geblieben sind. Vor der Anschaffung seines 
CPC zählte das Kunsthandwerk zu seinen größten Hobbys. Nach¬ 
bildungen von Kunstwerken stellte er jeweils in einer anderen Tech¬ 
nik als der des Originals her. 

Nachdem ersieh jedoch seinen CPC zugelegt hatte, mußte der CPC 
für die Gestaltung von Grafiken herhalten. So ist dann auch das Rad¬ 
rennen von Lyonei Feininger in den Bit-Dschungel der modernen 
Datenverarbeitung übernommen worden. Sein künstlerisches Ge¬ 
schick macht sich sicher nicht zum ersten Mal bezahlt. Fünf Pro¬ 
gramme sind doch auch ein ordentlicher Lohn! 

Mit dem Computer hergestellte, symmetrische Grafik gefällt Herrn 
Natzmer unter anderem deshalb, weil es kaum möglich sein dürfte, 
mit anderen M ilteln so ideale Symmetrien zu schaffen. Darüber hin¬ 
aus arbeitet er auch mit Programmen w ie zum Beispiel dem Fraktal- 
Generator 3D. Die damit erzeugten Grafiken läßt er dann mit dem 
Programm aus “Im Zauberreich der Grafik“ (CPC 3/89) in symme¬ 
trische Muster umwandeln. 

Von den schönsten Grafiken fertigt er dann Bildschirmfoios an. 


3. Preis 

Name: Werner Kropf 
Alter: 18 

Bildtitel: Asterix undObelix 
System: CPC 6128 

Bei Herrn Kropf ist der CPC seit Dezember 1987 im Einsatz. Wie er 
gesteht, benutzt er seinen CPC meistens zum Spielen. Aber auch für 
seine 1 lausübungen oder beim Lernen wird der CPC eingesetzt. Ge¬ 
legentlich ent wirft er auch Grafiken auf seinem Rechner. Diese er¬ 
stellt er jedoch immer in Mode 1 in Farbe. Daher konnte er auch kei¬ 
ne der bereits vorhandenen Grafiken verwenden, sondern mußte 
sich neu ans Werk machen. 

Da er ein ausgesprochener Aslerix-Fan ist, lag es nahe, seine Lieb- 
lingsfigurcn im Bild festzuhalten. Bei den bereits angefertigten 
Grafiken war immer nureine Figuraufeinem Bild. Für unseren Gra¬ 
fikwettbewerb versuchte er aber, alle drei Hauptfiguren in einem 
17-kBytc-Sereen unterzubringen. Somit lächeln uns jetzt Asterix, 
Obelix und, nicht zu vergessen, der kleine Idcfix vom Bildschirm 
heran. 

Sieben Programme sollten ein angemessener Lohn sein. 
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5. Preis 

Name: Kerstin Faber 
Aller: 17 
Bildtilel: Chaos 
System: CPC 6128 

Computern am CPC kann anscheinend wirklich ansteckend sein. So 
schreibt Frau Faber, daß sic seit sieben Monaten als “Parasit” am 
CPC ihres Freundes tätig ist. Ob der Ärmste seinen CPC überhaupt 
noch unter die Finger bekommt? Wenn sie erst einmal Ihre vier 
Spiele ausgepackt hat, sicherlich nicht mehr! 

Auch die Umschreibung ihres Bildes ist aus dem Leben gegriffen. 
Kurz, aber treffend beschreibt sie ihr Bild so: “Chaos, das ich emp¬ 
finde, wenn ich ein kompliziertes Listing betrachte!”. So geht es si¬ 
cherlich vielen, aber mit etwas Übung und Einsatz dürfte auch diese 
Hürde zu nehmen sein. Mit Hilfe unserer neuen Leserbriefseile und 
unserer Trickkiste, die ab dieser Ausgabe neu ins lieft kommt, kann 
sicher so manchem geholfen werden. Ansonsten gibt es ja noch den 
Heißen Draht, bei dem jeden Dienstag von 16.00 bis 10.00 Uhr die 
gesamte CPC-Redaktion mit Rat und Tat zur Seite steht. 


6. Preis 

Name: Ulrich Massow 
Alter: 37 
Bildtitel: Myself 
System: CPC 6128 

Ein CPC 6128 befindet sich seit 1986 im Besitz von Herrn Massow. 
Er wird in Verbindung mit dem AMX-Stop-Press-Programm sowie 
einem Video-Digitizer betrieben. Um seine Grafiken etwas zu ver¬ 
feinern, schreibt er hier und da schon mal ein Programm. Leider feh¬ 
len jedoch noch die nötigen Assembler-Kenntnisse, um seine Routi¬ 
nen in der Geschwindigkeit zu optimieren. 

Mit seinem Bild versucht er auszudrücken, was ihm tagtäglich 
durch den Kopf geht. Daher auch der Name “MYSELF” für seine 
Einsendung. Von den härtesten Drogen über Alkohol und Nikotin 
findet sich alles in seiner Grafik wieder. Auch einen Panzer, eine Fa¬ 
brik sowie das Zeichen für Radioaktivität kann man den Gedanken¬ 
blasen entnehmen. Aber nicht nur Negatives scheint seine Gedan¬ 
ken zu prägen. So denkt er offensichtlich gerne an sein neues Auto 
oder an den Wagen seiner Träume? 

Auch das Selbstportrait scheint ihm in allen Einzelheiten gelungen 
zu sein. Somit bekommt er demnächst drei Computerspiele per 
Post zugesandt. 


7. Preis 

Name: PeerKrog 
Aller: 35 
Bildtitel: Borg 
System: CPC 6128 

Mit dem Screendesigner von Amsoft hat I lerr Krog diese Burg ge¬ 
zeichnet. Die Idee hierzu entstand beim Spielen des Programms 
Landgraf aus der CPC International 6/7’91.1 lerr Krog ist bei dieser 
Zeichnung sehr ins Detail gegangen. So wurde die Bodenlandschaft 
durch Elemente wie zum Beispiel eine Brücke, Büsche und Bäume, 
ja sogar durch zwei Kühe und einen Hasen aufgelockert. Im Hori¬ 
zont erkennt man neben den üblichen Wolken und der Sonne noch 
einen Berg, den Reinhold Messner sicher gerne besteigen würde. 
Steile Hänge sowie die zu erahnende Höhe bieten für ihn sicher ei¬ 
nen recht hohen Schwierigkeitsgrad. Auch wenn die Perspektive 
nicht hundertprozentig stimmt, ist dieses Bild eine oder mehrere Be¬ 
trachtungen wert. 

Bei genauerem Hinsehen erkennt man immer wieder ein Detail, das 
beim ersten Blick nicht aufgefallen ist. 

Auch bei den zwei Spielen, die er als Preis bekommt, wird er hof¬ 
fentlich jedes Detail entdecken. 
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AMS-Line 

Schnittstellenprobleme am CPC plus 

Auch diesen Monat kommt wieder so manch wichtiger Tip von der Firma 
VVeeske. Dieses Mal geht es um die Anschlüsse der CPC-plus-Reihe. 


In der Ausgabe 10/11 ’91, Seite 31, wur¬ 
de bereits auf die veränderten Schnitt¬ 
stellen und Pin-Belegungen am CPC 
plus gegenüber seinem Vorgänger hin¬ 
gewiesen. Im Bild 2 auf dieser Seite ist 
leider ein kleiner Fehler. Die Pin-Be¬ 
zeichnung 19 ist mit 36 vertauscht wor¬ 
den. Somit muß Pin 19 gegenüber I und 
36 gegenüber 18 liegen. 

Heute wollen wir auf einige An¬ 
schlußprobleme genauer eingehen und 
deren Lösungen beschreiben. 
ACHTUNG! Böse Falle am CPC 
6128 plus: die Floppy-Schnittstelle 
Als die übelste Falle, die sich AM- 
STRAD am CPC 6128 plus hat einfal¬ 
len lassen, ist die Schnittstelle für das 
externe Diskettenlaufwerk anzusehen. 
Die Schnittstelle ist zwar äußerlich 
identisch zum Vorgänger CPC 6128, 
aber nicht Pin-kompatibel. Viele CPC- 
6128-plus-Besitzer mußten leider 
schon die bittere Erfahrung machen, 
daß nach Anschluß eines FD-1 oder an¬ 
derer externer Diskettenlaufwerke jeg¬ 
licher Diskettenzugriff versagte. Auch 
nach Abtrennen des externen Lauf wer¬ 
kes mußte man feststellen, daß das in¬ 
terne Diskettenlaufwerk sich in das 
ewige Reich des Nimmerwiedersehens 
verabschiedet hat und nicht mehr zum 
Leben zu erwecken war. 

Das Anschlußproblem ist jedoch mit 
einem Adapter zu lösen, der nach ne¬ 
benstehender Belegung (Bild 1) ange- 
fertigt werden muß. Bei der Firma 
Weeske-Computer sind alle Adapter 
und ein fertiges FD-1-Anschlußkabel 
bereits zu beziehen. Damit lassen sich 
dann alle am CPC 6128 lauffähigen 
Diskettenstationen auch am CPC 6128 
plus betreiben. 

MP-2-Modulator am 
CPC plus 

Der Anschluß eines MP-2-Modulators 
zum Betreiben des CPC plus über den 
Antenneneingang eines Fersehgerätes 
ist auch mit einem Adapterkabelsatz 
möglich. 

Der CPC plus besitzt zum Anschluß der 
Videosignale an den Monitor eine 8po- 


Schnittstellenadapter für Floppy-An¬ 
schluß: 

vom CPC 6128 pl us zum Laufwerkskabel 
Stecker Buchse 

Pin 17 

> Pin 36 

ready 

Pin 16 

-Pin 35 

side 1 select 

Pin 15 

►Pin 34 

read data 

Pin 14 

-♦Pin 33 

write protect 

Pin 13 

-Pin 32 

trackO 

Pin 12 

►Pin 31 

write gate 

Pin 11 

> Pin 30 

write data 

Pin 10 

-Pin 29 

Step 

Pin 9 

►Pin 28 

direction select 

Pin 8 

-Pin 27 

motoron 

Pin 6 

> Pin 25 

drive I select 

Pin 4 

►Pin 23 

index 

Pin 19-36 

►Pin 1-18 

GND 


lige DIN-Buchse, da dieser im Gegen¬ 
satz zu seinem Vorgänger (öpolige 
DIN-Buchse) die Tonverarbeitung mit 
Lautstärkeregler und Stereoiautspre- 
cher im Monitor ausführt. Somit sind 
die zwei zusätzlichen Kontakte für den 
linken und rechten Stereokanal not¬ 
wendig. Beim Anschluß des MP-2 und 
der damit fehlenden Soundverarbei¬ 


tung durch den nicht verwendeten Mo¬ 
nitor muß bei Bedarf der Tonanschluß 
über eine separate Stereoanlage erfol¬ 
gen. 

Dieses kann über die an der linken Seite 
des CPC befindliche Stereo-Sound- 
Buchse geschehen. 

Als zweite kleine Hürde zeigte sieh die 
Anschlußbuchse für die 5V-Stromver- 
sorgung. Der Stecker für die 5V-Zulei- 
tung am MP-2 paßt mechanisch nicht in 
die Buchse des CPC plus, obwohl elek¬ 
trisch kompatibel. 

Hier ist ein Hohlstecker 2,5x5,5 mm 
notwendig. Der Stecker am MP-2 hat 
dagegen die Maße 2,1x5,5 mm. Hier 
bietet sich die Fertigung eines Adapter¬ 
kabels. 

Druckerschnittstelle 

Der Drucker wird über die an der Rück¬ 
seite des Rechners befindliche Schnitt¬ 
stelle betrieben. Im Gegensatz zum 
Vorgängermodell besitzt der CPC plus 
eine 25polige Sub-D-Buchse, wie sie 
überall auf dem PC-Markt standard¬ 
mäßig Verwendung findet. Somit kann 
ein normales PC-Druckerkabel (Sub-D 
auf Centronics) benutzt werden. 

Rainer Dombrowski/rs 
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Die korrekte Pin-Belegung für den Anschluß 
eines zweiten Laufwerks 
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Stift 1 - rot 

Stift 2 - grün 

Stift 3 - Blau 

Stift 4 - Synchronisation 

Stift 5 - Erd© 

Stift 6 - Luminanz 


Stift 1 - Synchronisation 

Stift 2 - grün 

Stift 3 - Luminanz 

Stift 4 - rot 

Stift 5 - blau 

Stift 6 - L Sound 

Stift 7 - R Sound 

Stift 6 - GND 


Das Monitorkabel beim CPC mul beim CPC plus 
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Für die Spielefremde inner unseren Lesern bringt das nächste Heft einige 
besondere Leckerbissen 


»CPC International« 4/5’92 
erhalten Sie nur im Bahnhofs¬ 
buchhandel oder direkt beim 
Verlag ab: 



CPC 


- Um C dreht sich alles beim Program- 
mier-Schwerpunkt der nächsten Aus¬ 
gabe. Ob es die Directory-Verwaltung 
i st. ein nützlicher Speicher- und Disket- 
ten-Hexdump oder das Ansehen von 
Textdateien: Wir /.eigen, wie man die 
unterschiedlichsten Aufgaben in C flott 
und unkompliziert löst. 

- Bei der Datenfernübertragung wird 
es ernst: Wir sagen Ihnen, wie das Zu¬ 
sammenspiel zwischen CPC und Mo¬ 
dem oder Akustikkoppler funktioniert. 
Dabei werden kommerzielle Interfaces 
genauso zu ihrem Recht kommen wie 
preiswerte Do-It-Yourself-Lösungen. 
Die serielle Schnittstelle als Tor zur 
großen Datenwell - kein Buch mit sie¬ 
ben Siegeln, sondern ein praktisches 
und selbstverständliches Alltags- 
Werkzeug. 

- Alle, die ihren BAS IC-Programmen 
noch ein bißchen mehr Dampf verpas¬ 
sen möchten, werden sich über den 
”Variablen-King” freuen. Dieses Pro- 
grammier-Utility beschleunigt Ihre ei¬ 
genen BAS IC-Programme. Darüber 


hinaus fällt bei der Beschäftigung mit 
diesem Thema garantiert einiges an 
lohnendem Programmier-Know-how 
für Sie ab. 

- Beim “I lardware-Striptease” ist dies¬ 
mal der Monitor des CPC dran. Begrif¬ 
fe wie Fokus. Bildwiederholfrequenz 
und RGß-Signal werden spätestens 
nach Lektüre des Artikels keine 
“böhmischen Dörfer” mehr für Sie 
sein. Machen Sie sich ein klares Bild 
von Ihrem Bildschirm und schauen Sic 
mit uns unterdie Oberflächeder“Flim- 
merkiste”-ganz ohne Risiko! 

-Mit dem "Label-Master” hat das 
deutsche Entwickler-Haus Crusader 
Software einen weiteren Beitrag zur 
ernsthaften Nutzung der CPC-Familie 
geliefert. Wir haben uns das aufwendi¬ 
ge Etikettierprogramm angesehen und 
sagen Ihnen, was es bringt. 

-ConText CPC ist heute wie Vorjahren 
einer der Renner in puncto Textverar- 
beilung auf den kleinen Amsirads. Wir 
bieten Ihnen eine Programmerweite¬ 
rung zum Abtippen, die das Schreib¬ 
programm mit einer pfiffigen Block- 
Kopierroutine ausstattet. 


Service 


- Unsere Leser fragen uns Monat für 
Monat Löcher in den Bauch - Löcher, 
für die wir sehr dankbar sind. Ohne Fra¬ 
gen keine Antworten, und ohne ständi¬ 
ge Recherchen keine neuen Erkennt¬ 
nisse. Viele technische Details und in¬ 
dividuelle Problemlösungen finden 
Sie in der nächsten Ausgabe auf den Le¬ 
serbrief-Seiten und in der AMS-Line. 
außerdem in der neuen Trickkiste und 
der 1 -k Byte-Rubrik. 

- Der Schwarzweißgrafik-Wettbe- 
werb geht weiter! Zu gewinnen gibt es 
jede Menge Spitzensoftware. Machen | 
Sie mit, und gestalten Sie die CPC In¬ 
ternational durch Ihre eigenen Grafi¬ 
ken mit! 

PCW 


- Nicht nur Technik-Freaks werden 
aufhorchen, wenn es in der nächsten 
Ausgabe dem monochromen Joyce- 
Bildschirm an den Kragen geht. Wir 
bieten Ihnen “Information komplett” 
rund um den PCW-Monitor. 


Com Zu Elektronik-Michael Kürbis ....95 
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DMV.2.49,50,55,56,103,104 
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PCW 

DATA BOX 

DATA BOX 

ist der preiswerte Software-Service Ihrer Zeitschrift 

DATABOX 

enthält lauffähige Programme für Ihren Einsatz 

DATABOX 

lohnt sich auf jeden Fall - Monat für Monat 


PCW 8256/8512/9512 


Im Herzen des JOYCE 

Lauffähig compilierte Beispielprogramme und die zuge¬ 
hörigen Quelltexte finden Sie auf der DATABOX. 


Die Trickkiste 

Wollen Sie die Zahl PI etwas genauer? Wir haben für 
Sie das CPC-BASIC-Programm auf den Joyce umge¬ 
setzt. 


Listiges Listen 

Wer kennt es nicht, das Programm TYPE.COM. Ärger¬ 
lich ist immer, daß man bei der Ansicht von Texten nicht 
mehr zurückblättern kann. Mit dem Programm 
XTYPE.COM wird das jetzt möglich. 

Einer für alle 

Ein Nachteil höherer Programmiersprachen ist, daß sie 
immer eine mehr oder weniger große Laufzeitbibliothek 
mit sich herumschleppen. So natürlich auch Turbo 
Pascal. Aber es geht auch anders. 

APL-Z 

Wir bieten den fertigen Compiler mit vielen Beispielen 
für Ihren PCW. 


Einzelbezugspreis für DATABOX: 

PCW - 3-Zoll-Diskette 


24,- DM 

Wenn Sie über den DMV-Verlag bestellen, gilt folgendes: 


Inland: 

Einzelpreis 
zzgl. Versandkosten 

24,- DM 
4,- DM 

Ausland: 

Einzelpreis 
zzgl. Versandkosten 

24,- DM 
6.- DM 

Endpreis 

28.- DM 

Endpreis 

30,- DM 


Zahlungshinweise: 

Am einfachsten per Vorkasse (Verrechnungsscheck) oder als Nachnahme zuzüglich der Nach¬ 
nahmegebühr. (Bei Lieferungen ins Ausland ist Nachnahme nicht möglich.) 


Bitte benutzen Sie die Bestellkarte. 

DMV-Verlag ■ Postfach 250 • 3440 Eschwege 
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DATABOX 


Das ist die Software zur PC INTERNATIONAL 
Jeden Monat neu 

DATABOX: 

- mehr als der übliche Software-Service 

- bringt ergänzend sämtliche Listings der jeweiligen 
Zeitschrift und alle Programmbeispiele auf Kassette 
oder auf 3-Zoll-Diskette 

- Die Programme sind, soweit systembedingt möglich, 
auf allen drei CPC-Modellen lauffähig. Einzelheiten 
entnehmen Sie bitte der nebenstehenden Aufstellung. 

- Soweit die Programme nicht Bestandteil einer Serie 
sind, befinden sich alle Programme als »ready to run« 
auf der DATABOX. 

- erscheint jeden Monat und trägt das Titelbild des 
gleichzeitig erscheinenden Heftes 

- Der Datenträger zur PC International enthält außerdem 
jedesmal ein zusätzliches Bonusprogramm, das nicht im 
Heft abgedruckt ist. 


Einzelbezugspreise für DATABOX: 

3-Zoll-Diskette 



Inland: 


Ausland: 



Einzelpreis 

24.- DM 

Einzelpreis 

24,- 

DM 

zzgl. Versandkosten 

4,- DM 

zzgl. Versandkosten 

6,- 

DM 

Endpreis 

28,- DM 

Endpreis 

30,- 

DM 


Kassette 


Inland: 


Ausland: 


Einzelpreis 

14,- DM 

Einzelpreis 

14,- DM 

zzgl. Versandkosten 

4,- DM 

zzgl. Versandkosten 

6,- DM 

Endpreis 

18,- DM 

Endpreis 

20,- DM 



äs«»! 

und 3-Zoll-Djskene. r ^ CPCs als Kas sette 


713 
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Zahlungsweise: 

Am einfachsten per Vorkasse (Verrechnungsscheck) oder als Nachnahme zu¬ 
züglich der Nachnahmegebühr. Bei Lieferungen ins Ausland ist Nachnahme 
nicht möglich. 

Bitte benutzen Sie die Bestellkarte. 

DMV-Verlag - Postfach 250 ■ 3440 Eschwege e y, 




















